Changes to m4/src/Attic/input.c,v [branch-1_4]

[Eric Blake]

CVSROOT:        /sources/m4
Module name:    m4
Branch:         branch-1_4
Changes by:     Eric Blake <ericb>      06/10/14 15:24:09

Index: src/input.c
===================================================================
RCS file: /sources/m4/m4/src/Attic/input.c,v
retrieving revision 1.1.1.1.2.26
retrieving revision 1.1.1.1.2.27
diff -u -b -r1.1.1.1.2.26 -r1.1.1.1.2.27
--- src/input.c 12 Oct 2006 14:10:35 -0000      1.1.1.1.2.26
+++ src/input.c 14 Oct 2006 15:24:09 -0000      1.1.1.1.2.27
@@ -356,6 +356,7 @@
       if (ferror (isp->u.u_f.file))
        {
          M4ERROR ((warning_status, 0, "read error"));
+         if (isp->u.u_f.close)
          fclose (isp->u.u_f.file);
          retcode = EXIT_FAILURE;
        }