1 /* Copyright (c) 1979 Regents of the University of California */ 2 3 static char sccsid[] = "@(#)TEOF.c 1.4 08/16/82"; 4 5 #include "h00vars.h" 6 7 bool 8 TEOF(filep) 9 10 register struct iorec *filep; 11 { 12 if (filep->fblk >= MAXFILES || _actfile[filep->fblk] != filep || 13 (filep->funit & FDEF)) { 14 ERROR("Reference to an inactive file\n", 0); 15 return; 16 } 17 if (filep->funit & (EOFF|FWRITE)) 18 return TRUE; 19 IOSYNC(filep); 20 if (filep->funit & EOFF) 21 return TRUE; 22 return FALSE; 23 } 24