[Bug fortran/51378] [OOP] Structure constructor wrongly rejects parent components if only child has PRIVATE comps

[burnus at gcc dot gnu.org]

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

--- Comment #1 from Tobias Burnus <burnus at gcc dot gnu.org> 2011-12-08 
18:57:01 UTC ---
Author: burnus
Date: Thu Dec  8 18:56:58 2011
New Revision: 182133

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

        PR fortran/51378
        * symbol.c (gfc_find_component): Fix access check of parent
        components.

2011-12-08  Tobias Burnus  <bur...@net-b.de>

        PR fortran/51378
        * gfortran.dg/private_type_14.f90: New.


Added:
    trunk/gcc/testsuite/gfortran.dg/private_type_14.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/symbol.c
    trunk/gcc/testsuite/ChangeLog