------- Comment #1 from kargl at gcc dot gnu dot org  2008-12-08 18:24 -------
Yeah, this has always bothered me.  I typically use -fmax-errors=1 when
developing new code because of the run-on errors for simple mistakes.
This fixes the excessive errors in this case.

Index: symbol.c
===================================================================
--- symbol.c    (revision 142481)
+++ symbol.c    (working copy)
@@ -1559,7 +1559,8 @@ gfc_add_type (gfc_symbol *sym, gfc_types
          || gfc_notification_std (GFC_STD_GNU) == ERROR
          || pedantic)
        {
-         gfc_error (msg, sym->name, where, gfc_basic_typename (sym->ts.type));
+         gfc_fatal_error (msg, sym->name, where,
+                          gfc_basic_typename (sym->ts.type));
          return FAILURE;
        }
       if (gfc_notify_std (GFC_STD_GNU, msg, sym->name, where,


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38444

Reply via email to