------- Comment #6 from pinskia at gcc dot gnu dot org 2006-02-13 01:19 ------- Confirmed. here is the patch which fixes this testcase for me: Index: trans-decl.c =================================================================== --- trans-decl.c (revision 110867) +++ trans-decl.c (working copy) @@ -1779,7 +1779,7 @@ gfc_get_fake_result_decl (gfc_symbol * s length = sym->ts.cl->backend_decl; if (TREE_CODE (length) == VAR_DECL && DECL_CONTEXT (length) == NULL_TREE) - gfc_finish_var_decl (length, sym); + gfc_add_decl_to_function (length); }
if (gfc_return_by_reference (sym)) -- pinskia at gcc dot gnu dot org changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |pinskia at gcc dot gnu dot | |org Status|UNCONFIRMED |NEW Ever Confirmed|0 |1 Keywords| |link-failure, wrong-code Last reconfirmed|0000-00-00 00:00:00 |2006-02-13 01:19:12 date| | Summary|regression from 4.1 to trunk|[4.2 Regression] from 4.1 to |with TREE_STATIC |trunk with TREE_STATIC |designation. |designation. Target Milestone|--- |4.2.0 http://gcc.gnu.org/bugzilla/show_bug.cgi?id=26246