------- Comment #9 from burnus at gcc dot gnu dot org 2006-11-15 17:06 ------- For IMPORT the error occures in expr.c's check_init_expr case EXPR_VARIABLE: if (e->symtree->n.sym->attr.flavor == FL_PARAMETER) { t = simplify_parameter_variable (e, 0); break; } gfc_error ("Parameter '%s' at %L has not been declared or is "
It should have actually matched FL_PARAMETER, but for some reasons it has not. For IMPORT :: dp it happens in trans-decl.c's gfc_create_module_variable: /* Only output symbols from this module. */ if (sym->ns != module_namespace) { /* I don't think this should ever happen. */ internal_error ("module symbol %s in wrong namespace", sym->name); } I don't see immediately how to fix this. If someone has a good spontaneous idea ... otherwise I try to understand how it should work. -- burnus at gcc dot gnu dot org changed: What |Removed |Added ---------------------------------------------------------------------------- Keywords| |ice-on-valid-code http://gcc.gnu.org/bugzilla/show_bug.cgi?id=27546