diplodocus.org Git - nmh/blob - docs/historical/mh-6.8.5/miscellany/libndir/telldir.c

   1 static char sccsid[] = "@(#)telldir.c 4.4 4/2/83";
   2
   3 #include <sys/types.h>
   4 #include <dir.h>
   5
   6 /*
   7  * return a pointer into a directory
   8  */
   9 long
  10 telldir(dirp)
  11         DIR *dirp;
  12 {
  13         extern long lseek();
  14
  15         return (lseek(dirp->dd_fd, 0L, 1) - dirp->dd_size + dirp->dd_loc);
  16 }