[Bug fortran/54221] Explicit private access specifier signals "unexpected defined but not used [-Wunused-function]" warning

[burnus at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=54221

--- Comment #3 from Tobias Burnus <burnus at gcc dot gnu.org> 2012-08-12 09:52:36 UTC ---
Author: burnus
Date: Sun Aug 12 09:52:33 2012
New Revision: 190325

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=190325
Log:
2012-08-12  Tobias Burnus  <burnus@net-b.de>

        PR fortran/54221
        * trans-decl.c (gfc_finish_var_decl, build_function_decl):
        Fix setting private module vars/procs as TREE_PUBLIC(...) = 0.

2012-08-12  Tobias Burnus  <burnus@net-b.de>

        PR fortran/54221
        * vect/vect-gems.f90: Don't mark module vars as PRIVATE as
        they appear uninitialized on the RHS.
        * gfortran.dg/public_private_module_6.f90: New.


Added:
    trunk/gcc/testsuite/gfortran.dg/public_private_module_6.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/trans-decl.c
    trunk/gcc/testsuite/ChangeLog
    trunk/gcc/testsuite/gfortran.dg/vect/vect-gems.f90