------- Comment #3 from jvdelisle at gcc dot gnu dot org 2008-07-12 01:22
-------
I think maybe this is the right fix, in keeping with what we do now other
places. But the error message is not as clear.
Index: io.c
===================================================================
--- io.c (revision 137403)
+++ io.c (working copy)
@@ -694,9 +694,12 @@ data_desc:
error = zero_width;
goto syntax;
}
- else
- return gfc_notify_std (GFC_STD_F2008, "Fortran F2008: 'G0' in "
- "format at %C");
+
+ if (gfc_notify_std (GFC_STD_F2008, "Fortran F2008: 'G0' in "
+ "format at %C") == FAILURE)
+ return FAILURE;
+
+ goto between_desc;
}
if (u == FMT_ERROR)
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36725
