fwrite.c 378 B

1234567891011121314
  1. #include <stdio.h>
  2. __ATTR_LIB_C__ unsigned short fwrite(const void *ptr, short size, short n, FILE *f)
  3. {
  4. unsigned short i,j;
  5. short binmode=f->flags&_F_BIN;
  6. f->flags|=_F_BIN;
  7. for(i=0;i<(unsigned short)n;i++)
  8. for(j=0;j<(unsigned short)size;j++)
  9. if(fputc(*(unsigned char*)ptr++,f)<0) goto fwrite_error;
  10. fwrite_error:
  11. f->flags&=binmode|(~_F_BIN);
  12. return i;
  13. }