|
|
1.1 root 1: fwrite(ptr, size, count, iop)
2: unsigned size, count;
3: register char *ptr;
4: register FILE *iop;
5: {
6: register unsigned s;
7: unsigned ndone;
8:
9: ndone = 0;
10: if (size)
11: for (; ndone<count; ndone++) {
12: s = size;
13: do {
14: putc(*ptr++, iop);
15: } while (--s);
16: if (ferror(iop))
17: break;
18: }
19: return(ndone);
20: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.