re PR fortran/53175 (link failure for private module variables used in function speci...
authorTobias Burnus <burnus@net-b.de>
Fri, 4 May 2012 18:54:25 +0000 (20:54 +0200)
committerTobias Burnus <burnus@gcc.gnu.org>
Fri, 4 May 2012 18:54:25 +0000 (20:54 +0200)
commited4639a996cda959bf36c8fab94517a123978101
tree433a90213b8b4c8613e31097b36bed3bd909cdb1
parent6ba84c3143a13266f40ea804ae2fb98717ccfc04
re PR fortran/53175 (link failure for private module variables used in function specification)

2012-05-04  Tobias Burnus  <burnus@net-b.de>

        PR fortran/53175
        * resolve.c (resolve_variable): Set public_used
        if a private module variable is used in a (public)
        specification expression.
        * trans-decl.c (gfc_finish_var_decl): Mark those
        TREE_PUBLIC.

2012-05-04  Tobias Burnus  <burnus@net-b.de>

        PR fortran/53175
        gfortran.dg/public_private_module_5.f90: New.

From-SVN: r187175
gcc/fortran/ChangeLog
gcc/fortran/resolve.c
gcc/fortran/trans-decl.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/public_private_module_5.f90 [new file with mode: 0644]