|
|
1.1 root 1: /* Copyright (c) 1979 Regents of the University of California */
2:
3: static char sccsid[] = "@(#)PFLUSH.c 1.1 10/29/80";
4:
5: #include "h00vars.h"
6:
7: /*
8: * insure that a usable image is in the buffer window
9: */
10: PFLUSH()
11: {
12: register struct iorec *next;
13:
14: next = _fchain.fchain;
15: while(next != FILNIL) {
16: if ((next->funit & (FDEF | FREAD)) == 0) {
17: fflush(next->fbuf);
18: }
19: next = next->fchain;
20: }
21: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.