re PR fortran/26246 (return string length is being marked as TREE_STATIC and TREE_PUBLIC)
authorAndrew Pinski <pinskia@physics.uc.edu>
Mon, 13 Feb 2006 21:31:18 +0000 (22:31 +0100)
committerJakub Jelinek <jakub@gcc.gnu.org>
Mon, 13 Feb 2006 21:31:18 +0000 (22:31 +0100)
commita7d6b7655606e2107da942ad0cc1df10ac4ead20
treea794ae1237b5805a753aa941e0560320e6deceec
parent6f538523d1e363cb51f08b52e31062304352e543
re PR fortran/26246 (return string length is being marked as TREE_STATIC and TREE_PUBLIC)

2006-02-13  Andrew Pinski  <pinskia@physics.uc.edu>
    Jakub Jelinek  <jakub@redhat.com>

PR fortran/26246
* trans-decl.c (gfc_get_symbol_decl, gfc_get_fake_result_decl): Use
gfc_add_decl_to_function rather than gfc_finish_var_decl on length.

* gfortran.dg/pr26246_1.f90: New test.
* gfortran.dg/pr26246_2.f90: New test.

From-SVN: r110929
gcc/fortran/ChangeLog
gcc/fortran/trans-decl.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/pr26246_1.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/pr26246_2.f90 [new file with mode: 0644]