1*48661Sbostic static char sccsid[] = "@(#)telldir.c 4.1 2/21/82";
2*48661Sbostic 
3*48661Sbostic #include <sys/types.h>
4*48661Sbostic #include <ndir.h>
5*48661Sbostic 
6*48661Sbostic extern	long	lseek();	/* needed for pdp 11s -- ikonas!mcm */
7*48661Sbostic 
8*48661Sbostic /*
9*48661Sbostic  * return a pointer into a directory
10*48661Sbostic  */
11*48661Sbostic long
telldir(dirp)12*48661Sbostic telldir(dirp)
13*48661Sbostic 	DIR *dirp;
14*48661Sbostic {
15*48661Sbostic 	return (lseek(dirp->dd_fd, 0L, 1) - dirp->dd_size + dirp->dd_loc);
16*48661Sbostic }
17