|
|
1.1 ! root 1: /* Copyright (c) 1979 Regents of the University of California */ ! 2: ! 3: static char sccsid[] = "@(#)FLUSH.c 1.2 6/10/81"; ! 4: ! 5: #include "h00vars.h" ! 6: ! 7: FLUSH(curfile) ! 8: ! 9: register struct iorec *curfile; ! 10: { ! 11: if (curfile->fblk >= MAXFILES || _actfile[curfile->fblk] != curfile) { ! 12: ERROR("Reference to an inactive file\n", 0); ! 13: return; ! 14: } ! 15: if (curfile->funit & FWRITE) { ! 16: fflush(curfile->fbuf); ! 17: } ! 18: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.