entered into RCS

diff --git a/dirent/list.c b/dirent/list.c
index 2cfae41..606bd42 100644 (file)
--- a/dirent/list.c
+++ b/dirent/list.c
@@ -1,4 +1,4 @@
-/* Copyright (C) 1991 Free Software Foundation, Inc.
+/* Copyright (C) 1991, 1993 Free Software Foundation, Inc.
 This file is part of the GNU C Library.
 
 The GNU C Library is free software; you can redistribute it and/or
@@ -39,10 +39,14 @@ DEFUN(test, (name), CONST char *name)
       return;
     }
 
+  errno = 0;
   while ((entp = readdir(dirp)) != NULL)
     printf("%s\tfile number %lu\n",
           entp->d_name, (unsigned long int) entp->d_fileno);
 
+  if (errno)
+    perror ("readdir");
+
   if (closedir(dirp) < 0)
     perror("closedir");
 }