CVSROOT: /sources/m4
Module name: m4
Changes by: Eric Blake <ericb> 06/10/14 15:23:08
Index: m4/input.c
===================================================================
RCS file: /sources/m4/m4/m4/input.c,v
retrieving revision 1.53
retrieving revision 1.54
diff -u -b -r1.53 -r1.54
--- m4/input.c 13 Oct 2006 16:46:47 -0000 1.53
+++ m4/input.c 14 Oct 2006 15:23:08 -0000 1.54
@@ -298,6 +298,7 @@
{
m4_error (context, 0, 0, _("error reading file `%s'"),
m4_get_current_file (context));
+ if (me->u.u_f.close)
fclose (me->u.u_f.file);
}
else if (me->u.u_f.close && fclose (me->u.u_f.file) == EOF)