ack/lang/cem/libcc.ansi/stdio/fwrite.c
2018-06-21 22:33:47 +02:00

31 lines
454 B
C

/*
* fwrite.c - write a number of array elements on a file
*/
/* $Id$ */
#include <stdio.h>
size_t
fwrite(const void* ptr, size_t size, size_t nmemb,
register FILE* stream)
{
register const unsigned char* cp = ptr;
register size_t s;
size_t ndone = 0;
if (size)
while (ndone < nmemb)
{
s = size;
do
{
if (putc((int)*cp, stream)
== EOF)
return ndone;
cp++;
} while (--s);
ndone++;
}
return ndone;
}