ack/lang/cem/libcc/stdio/fwrite.c

24 lines
333 B
C
Raw Normal View History

1987-01-27 15:57:55 +00:00
#include <stdio.h>
fwrite(ptr, size, count, file)
unsigned size, count;
register char *ptr;
register FILE *file;
{
unsigned s;
unsigned ndone = 0;
if (size)
while ( ndone < count ) {
s = size;
do {
putc(*ptr++, file);
if (ferror(file))
return(ndone);
}
while (--s);
ndone++;
}
return(ndone);
}