diff mbox

[Fortran,committed] Fix gfc_error call

Message ID 54C3D234.4020903@net-b.de
State New
Headers show

Commit Message

Tobias Burnus Jan. 24, 2015, 5:11 p.m. UTC 
Seemingly, we missed a gfc_error call, which takes two locations, which 
is not yet supported. Hence, the old version (gfc_error_1) has to be used.

Committed as Rev. 220084 as obvious.

Tobias
diff mbox

Patch

Index: gcc/fortran/ChangeLog
===================================================================
--- gcc/fortran/ChangeLog	(Revision 220083)
+++ gcc/fortran/ChangeLog	(Arbeitskopie)
@@ -1,3 +1,7 @@ 
+2015-01-24  Tobias Burnus  <burnus@net-b.de>
+
+	* parse.c (gfc_parse_file): Fix two-location gfc_error call.
+
 2015-01-23  Martin Liska  <mliska@suse.cz>
 
 	* decl.c (attr_decl1): Workaround -Wmaybe-uninitialized
Index: gcc/fortran/parse.c
===================================================================
--- gcc/fortran/parse.c	(Revision 220083)
+++ gcc/fortran/parse.c	(Arbeitskopie)
@@ -5544,7 +5544,7 @@  duplicate_main:
   /* If we see a duplicate main program, shut down.  If the second
      instance is an implied main program, i.e. data decls or executable
      statements, we're in for lots of errors.  */
-  gfc_error ("Two main PROGRAMs at %L and %C", &prog_locus);
+  gfc_error_1 ("Two main PROGRAMs at %L and %C", &prog_locus);
   reject_statement ();
   gfc_done_2 ();
   return true;