------- Comment #2 from jvdelisle at gcc dot gnu dot org 2007-08-09 23:27
-------
Regarding the test case:
&code char='Improper lower case name',X=-3.0/
Fortran 95 Standard 10.9.1 states:
"If a processor is capable of representing letters in both upper and lower
case, a group name or object name is without regard to case. "
So lower case is not improper.
The standard also states that at least one space is required after the namelist
name. This patch fixes it:
Index: list_read.c
===================================================================
--- list_read.c (revision 127265)
+++ list_read.c (working copy)
@@ -2592,6 +2592,13 @@ find_nml_name:
if (dtp->u.p.nml_read_error)
goto find_nml_name;
+
+ c = next_char (dtp);
+ if (c != ' ')
+ {
+ unget_char (dtp, c);
+ goto find_nml_name;
+ }
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33039
