re PR fortran/42545 (type extension: parent component has wrong accessibility)
authorJanus Weil <janus@gcc.gnu.org>
Tue, 19 Jan 2010 13:45:07 +0000 (14:45 +0100)
committerJanus Weil <janus@gcc.gnu.org>
Tue, 19 Jan 2010 13:45:07 +0000 (14:45 +0100)
commitf89cc1a337524ae9d1e32e020562ec27ca056ad2
tree862f8561a7cde35057e44f9c5f3509db7dee40ad
parentd6600130faf0a670610f412c88dd3614be5886c0
re PR fortran/42545 (type extension: parent component has wrong accessibility)

gcc/fortran/
2010-01-19  Janus Weil  <janus@gcc.gnu.org>

PR fortran/42545
* resolve.c (resolve_fl_derived): Set the accessibility of the parent
component for extended types.
* symbol.c (gfc_find_component): Remove a wrongly-worded error message
and take care of parent component accessibility.

gcc/testsuite/
2010-01-19  Janus Weil  <janus@gcc.gnu.org>

PR fortran/42545
* gfortran.dg/extends_6.f03: Modified an error message.
* gfortran.dg/extends_10.f03: New test.
* gfortran.dg/private_type_6.f03: Modified an error message.
* gfortran.dg/structure_constructor_8.f03: Ditto.

From-SVN: r156040
gcc/fortran/ChangeLog
gcc/fortran/resolve.c
gcc/fortran/symbol.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/extends_10.f03 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/extends_6.f03
gcc/testsuite/gfortran.dg/private_type_6.f90
gcc/testsuite/gfortran.dg/structure_constructor_8.f03