kolibrios-gitea/programs/develop/ktcc/trunk/libc/stdio/fputs.c
siemargl ace23ebbe2 libc testsuite + fixes
git-svn-id: svn://kolibrios.org@6433 a494cfbc-eb01-0410-851d-a64ba20cac60
2016-05-19 12:15:22 +00:00

28 lines
409 B
C

#include <stdio.h>
int fputs ( const char * str, FILE * file )
{
int rc;
if(!file || !str)
{
errno = E_INVALIDPTR;
return EOF;
}
if ((file->mode & 3)==FILE_OPEN_READ)
{
errno = E_ACCESS;
return EOF;
}
while(*str)
{
rc = fputc(*str, file);
if (rc < 0) return rc;
str++;
}
return 0;
}