http://gcc.gnu.org/bugzilla/show_bug.cgi?id=47730
janus at gcc dot gnu.org changed: What |Removed |Added ---------------------------------------------------------------------------- Status|NEW |ASSIGNED AssignedTo|unassigned at gcc dot |janus at gcc dot gnu.org |gnu.org | --- Comment #4 from janus at gcc dot gnu.org 2011-02-14 21:05:56 UTC --- The following patch fixes the ICE in all three test cases and regtests cleanly: Index: gcc/fortran/parse.c =================================================================== --- gcc/fortran/parse.c (revision 170150) +++ gcc/fortran/parse.c (working copy) @@ -3154,6 +3154,7 @@ gfc_build_block_ns (gfc_namespace *parent_ns) t = gfc_add_flavor (&my_ns->proc_name->attr, FL_LABEL, my_ns->proc_name->name, NULL); gcc_assert (t == SUCCESS); + gfc_commit_symbol (my_ns->proc_name); } if (parent_ns->proc_name) Will commit as obvious.