|
|
1.1 ! root 1: /* Copyright (c) 1979 Regents of the University of California */ ! 2: ! 3: static char sccsid[] = "@(#)WRITEC.c 1.1 10/29/80"; ! 4: ! 5: #include "h00vars.h" ! 6: #include "h01errs.h" ! 7: ! 8: WRITEC(curfile, d1, d2) ! 9: ! 10: register struct iorec *curfile; ! 11: int d1, d2; ! 12: { ! 13: if (curfile->funit & FREAD) { ! 14: ERROR(EWRITEIT, curfile->pfname); ! 15: return; ! 16: } ! 17: fputc(d1, d2); ! 18: if (ferror(curfile->fbuf)) { ! 19: ERROR(EWRITE, curfile->pfname); ! 20: return; ! 21: } ! 22: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.