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

Reply via email to