{
FILE *stream = NULL;
int fd;
- int fd_index;
ptrdiff_t count = SPECPDL_INDEX ();
struct gcpro gcpro1, gcpro2, gcpro3;
Lisp_Object found, efound, hist_file_name;
#endif
}
- if (fd < 0)
- {
- /* Pacify older GCC with --enable-gcc-warnings. */
- IF_LINT (fd_index = 0);
- }
- else
+ if (fd >= 0)
{
- fd_index = SPECPDL_INDEX ();
record_unwind_protect_ptr (close_file_ptr_unwind, &fd);
record_unwind_protect_ptr (fclose_ptr_unwind, &stream);
}