Remove redundant include of unistd.h, stdlib.h. Use

[gnu-emacs] / src / lread.c

diff --git a/src/lread.c b/src/lread.c
index 525e045b02945cd6134198c159ac9320add1f19b..0c9bc140b73174ce1837e425de15f5352fbd3b84 100644 (file)
--- a/src/lread.c
+++ b/src/lread.c
@@ -61,6 +61,9 @@ Boston, MA 02111-1307, USA.  */
 #include <locale.h>
 #endif /* HAVE_SETLOCALE */
 
+#ifdef HAVE_FCNTL_H
+#include <fcntl.h>
+#endif
 #ifndef O_RDONLY
 #define O_RDONLY 0
 #endif
@@ -1054,6 +1057,8 @@ openp (path, str, suffixes, storeptr, predicate)
   Lisp_Object string, tail, encoded_fn;
   int max_suffix_len = 0;
 
+  CHECK_STRING (str);
+
   for (tail = suffixes; CONSP (tail); tail = XCDR (tail))
     {
       CHECK_STRING_CAR (tail);