------- Comment #2 from burnus at gcc dot gnu dot org 2008-03-06 19:03 ------- Paul, do you have an idea?
The ICE happens when reading the .mod for p->u.wsym.sym->name == "i" in free_pi_tree: if (p->fixup != NULL) gfc_internal_error ("free_pi_tree(): Unresolved fixup"); I got somehow lost in module.c when trying to track 'fixup'. See comment 1 for your patch which caused the regression. Still, I cannot see anything which is obviously wrong. Just for fun, I set p->fixup = NULL in mio_symtree_ref (see your patch), then one gets the error that COMMON 'c' does not exist. -- burnus at gcc dot gnu dot org changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |pault at gcc dot gnu dot org http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35474