CVSROOT: /sources/m4
Module name: m4
Branch: branch-1_4
Changes by: Eric Blake <ericb> 06/10/14 14:14:54
Index: src/builtin.c
===================================================================
RCS file: /sources/m4/m4/src/Attic/builtin.c,v
retrieving revision 1.1.1.1.2.43
retrieving revision 1.1.1.1.2.44
diff -u -b -r1.1.1.1.2.43 -r1.1.1.1.2.44
--- src/builtin.c 13 Oct 2006 22:25:32 -0000 1.1.1.1.2.43
+++ src/builtin.c 14 Oct 2006 14:14:54 -0000 1.1.1.1.2.44
@@ -1092,7 +1092,9 @@
if (fp != NULL)
{
insert_file (fp);
- fclose (fp);
+ if (fclose (fp) == EOF)
+ M4ERROR ((warning_status, errno,
+ "error undiverting `%s'", ARG (i)));
}
else
M4ERROR ((warning_status, errno,
