------- Comment #14 from pinskia at gcc dot gnu dot org 2006-11-12 02:31 ------- Here is the fix which I am testing: Index: fortran/trans-expr.c =================================================================== --- fortran/trans-expr.c (revision 118717) +++ fortran/trans-expr.c (working copy) @@ -3104,6 +3104,7 @@ gfc_conv_expr_reference (gfc_se * se, gf { var = build_decl (CONST_DECL, NULL, TREE_TYPE (se->expr)); DECL_INITIAL (var) = se->expr; + TREE_STATIC (var) = 1; pushdecl (var); } else
-- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=26994