procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source 
Mention that it's needed only for older GCCs.
This commit is contained in:
Paul Eggert 2013-07-20 07:21:25 -07:00
parent 7e67809332
commit b2a069c2f8
2 changed files with 12 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/ChangeLog
View file

@ -1,3 +1,8 @@
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>
* coding.c (CODING_ISO_FLAG_LEVEL_4): New macro.

9
src/lread.c
View file

@ -1044,7 +1044,7 @@ Return t if the file exists and loads successfully. */)
{
FILE *stream;
int fd;
int fd_index = 0;
int fd_index;
ptrdiff_t count = SPECPDL_INDEX ();
struct gcpro gcpro1, gcpro2, gcpro3;
Lisp_Object found, efound, hist_file_name;
@ -1175,7 +1175,12 @@ Return t if the file exists and loads successfully. */)
#endif
}
if (fd >= 0)
if (fd < 0)
{
/* Pacify older GCC with --enable-gcc-warnings. */
IF_LINT (fd_index = 0);
}
else
{
fd_index = SPECPDL_INDEX ();
record_unwind_protect_int (close_file_unwind, fd);