OSDN Git Service

2008-03-28 Tobias Burnus <burnus@net-b.de>
authorburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 28 Mar 2008 10:12:05 +0000 (10:12 +0000)
committerburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 28 Mar 2008 10:12:05 +0000 (10:12 +0000)
       * symbol.c (gfc_get_default_type): Fix error message; option
       -fallow_leading_underscore should be -fallow-leading-underscore

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@133678 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/fortran/ChangeLog
gcc/fortran/symbol.c

index 670c5b8..5731e20 100644 (file)
@@ -1,3 +1,8 @@
+2008-03-28  Tobias Burnus  <burnus@net-b.de>
+
+       * symbol.c (gfc_get_default_type): Fix error message; option
+       -fallow_leading_underscore should be -fallow-leading-underscore
+
 2008-03-27  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 
        PR fortran/35724
index c86fa9a..6e87881 100644 (file)
@@ -212,7 +212,7 @@ gfc_get_default_type (gfc_symbol *sym, gfc_namespace *ns)
   letter = sym->name[0];
 
   if (gfc_option.flag_allow_leading_underscore && letter == '_')
-    gfc_internal_error ("Option -fallow_leading_underscore is for use only by "
+    gfc_internal_error ("Option -fallow-leading-underscore is for use only by "
                        "gfortran developers, and should not be used for "
                        "implicitly typed variables");