------- 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

Reply via email to