------- Comment #2 from pault at gcc dot gnu dot org 2007-01-18 14:27 -------
Confirmed.
With this patch:
Index: gcc/fortran/match.c
===================================================================
*** gcc/fortran/match.c (revision 120859)
--- gcc/fortran/match.c (working copy)
*************** gfc_match_namelist (void)
*** 2600,2605 ****
--- 2600,2612 ----
gfc_error_check ();
}
+ if (sym->ts.type == BT_CHARACTER && sym->ts.cl->length == NULL)
+ {
+ gfc_error ("Assumed character length '%s' in namelist '%s' at "
+ "%C is not allowed", sym->name, group_name->name);
+ gfc_error_check ();
+ }
+
if (sym->as && sym->as->type == AS_ASSUMED_SHAPE
&& gfc_notify_std (GFC_STD_GNU, "Assumed shape array '%s' in "
"namelist '%s' at %C is an extension.",
you now get
pr30481.f90:3.18:
namelist /abc/ c
1
Error: Assumed character length 'c' in namelist 'abc' at (1) is not allowed
If you feel like submitting/committing, please feel free.
Paul
--
pault at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |NEW
Ever Confirmed|0 |1
Last reconfirmed|0000-00-00 00:00:00 |2007-01-18 14:27:38
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=30481
