[Bug fortran/45081] [4.3/4.4/4.5/4.6 Regression] ICE in gfc_conv_array_initializer, at fortran/trans-array.c:4208

[burnus at gcc dot gnu dot org]

------- Comment #2 from burnus at gcc dot gnu dot org  2010-07-26 20:19 -------
Untested patch.

Index: expr.c
===================================================================
--- expr.c      (Revision 162542)
+++ expr.c
@@ -913,7 +913,7 @@ gfc_is_constant_expr (gfc_expr *e)
                  || gfc_is_constant_expr (e->value.op.op2)));

     case EXPR_VARIABLE:
-      return 0;
+      return (e->symtree->n.sym->attr.flavour == FL_PARAMETER);

     case EXPR_FUNCTION:
     case EXPR_PPC:


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=45081