Commit b2a069c2 authored by Paul Eggert's avatar Paul Eggert
Browse files

* lread.c (Fload): Avoid initialization only when lint checking.

Mention that it's needed only for older GCCs.
parent 7e678093
2013-07-20 Paul Eggert <eggert@cs.ucla.edu>
* lread.c (Fload): Avoid initialization only when lint checking.
Mention that it's needed only for older GCCs.
2013-07-20 Kenichi Handa <handa@gnu.org> 2013-07-20 Kenichi Handa <handa@gnu.org>
* coding.c (CODING_ISO_FLAG_LEVEL_4): New macro. * coding.c (CODING_ISO_FLAG_LEVEL_4): New macro.
......
...@@ -1044,7 +1044,7 @@ Return t if the file exists and loads successfully. */) ...@@ -1044,7 +1044,7 @@ Return t if the file exists and loads successfully. */)
{ {
FILE *stream; FILE *stream;
int fd; int fd;
int fd_index = 0; int fd_index;
ptrdiff_t count = SPECPDL_INDEX (); ptrdiff_t count = SPECPDL_INDEX ();
struct gcpro gcpro1, gcpro2, gcpro3; struct gcpro gcpro1, gcpro2, gcpro3;
Lisp_Object found, efound, hist_file_name; Lisp_Object found, efound, hist_file_name;
...@@ -1175,7 +1175,12 @@ Return t if the file exists and loads successfully. */) ...@@ -1175,7 +1175,12 @@ Return t if the file exists and loads successfully. */)
#endif #endif
} }
if (fd >= 0) if (fd < 0)
{
/* Pacify older GCC with --enable-gcc-warnings. */
IF_LINT (fd_index = 0);
}
else
{ {
fd_index = SPECPDL_INDEX (); fd_index = SPECPDL_INDEX ();
record_unwind_protect_int (close_file_unwind, fd); record_unwind_protect_int (close_file_unwind, fd);
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment