src/libstddjb/dir_close.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

/* ISC license. */

#include <errno.h>
#include <skalibs/direntry.h>

void dir_close (DIR *dir)
{
  int e = errno ;
  for (;;)
  {
    if (closedir(dir) == 0) break ;
    if (errno != EINTR) break ;
  }
  errno = e ;
}