ack/lang/cem/libcc/gen/closedir.c

15 lines
185 B
C
Raw Normal View History

1987-01-27 15:57:55 +00:00
#include <sys/types.h>
#include <sys/dir.h>
/*
* close a directory.
*/
closedir(dirp)
register DIR *dirp;
{
close(dirp->dd_fd);
dirp->dd_fd = -1;
dirp->dd_loc = 0;
free(dirp);
}