146111Sbostic /*- 246111Sbostic * Copyright (c) 1990 The Regents of the University of California. 346111Sbostic * All rights reserved. 446111Sbostic * 546111Sbostic * This code is derived from software contributed to Berkeley by 646111Sbostic * Chris Torek. 746111Sbostic * 846111Sbostic * %sccs.include.redist.c% 946111Sbostic */ 1046111Sbostic 1146111Sbostic #if defined(LIBC_SCCS) && !defined(lint) 12*55922Smarc static char sccsid[] = "@(#)fgetpos.c 5.2 (Berkeley) 08/19/92"; 1346111Sbostic #endif /* LIBC_SCCS and not lint */ 1446111Sbostic 1546111Sbostic #include <stdio.h> 1646111Sbostic 1746111Sbostic fgetpos(fp, pos) 1846111Sbostic FILE *fp; 1946111Sbostic fpos_t *pos; 2046111Sbostic { 21*55922Smarc return((*pos = ftell(fp)) == (fpos_t)-1); 2246111Sbostic } 23