1 /* Copyright (c) 1979 Regents of the University of California */ 2 3 static char sccsid[] = "@(#)TELL.c 1.2 03/07/81"; 4 5 #include "h00vars.h" 6 7 /* 8 * Find current location 9 */ 10 long 11 TELL(curfile) 12 13 register struct iorec *curfile; 14 { 15 long loc; 16 17 loc = ftell(curfile); 18 if ((curfile->funit | SYNC) == 0) 19 loc += 1; 20 return loc; 21 } 22