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

   1 static char sccsid[] = "@(#)closedir.c 4.2 3/10/82";
   2
   3 #include <sys/types.h>
   4 #include <dir.h>
   5
   6 /*
   7  * close a directory.
   8  */
   9 void
  10 closedir(dirp)
  11         register DIR *dirp;
  12 {
  13         close(dirp->dd_fd);
  14         dirp->dd_fd = -1;
  15         dirp->dd_loc = 0;
  16         free(dirp);
  17 }