symbol.c (gfc_get_default_type): Fix error message...
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 From-SVN: r133678
This commit is contained in:
parent
fc4f326169
commit
b0be8e5c63
@ -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>
|
2008-03-27 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||||||
|
|
||||||
PR fortran/35724
|
PR fortran/35724
|
||||||
|
@ -212,7 +212,7 @@ gfc_get_default_type (gfc_symbol *sym, gfc_namespace *ns)
|
|||||||
letter = sym->name[0];
|
letter = sym->name[0];
|
||||||
|
|
||||||
if (gfc_option.flag_allow_leading_underscore && letter == '_')
|
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 "
|
"gfortran developers, and should not be used for "
|
||||||
"implicitly typed variables");
|
"implicitly typed variables");
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user