r125984 - in /trunk/gcc: fortran/ChangeLog fort...

[burnus@gcc.gnu.org]

Author: burnus
Date: Sun Jun 24 16:19:11 2007
New Revision: 125984

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=125984
Log:
2007-06-24  Tobias Burnus  <burnus@net-de>

	PR fortran/32460
	* interface.c (gfc_compare_derived_types): Add access check.
	* symbol.c (gfc_find_component): Ditto.
	(gfc_set_component_attr,gfc_get_component_attr) Copy access state.
	* dump-parse-tree.c (gfc_show_components): Dump access state.
	* gfortran.h (struct gfc_component): Add gfc_access.
	* module.c (mio_component): Add access state.
	* (gfc_match_structure_constructor): Check for private access state.

2007-06-24  Tobias Burnus  <burnus@net-de>

	PR fortran/32460
	* gfortran.dg/private_type_6.f90: New.


Added:
    trunk/gcc/testsuite/gfortran.dg/private_type_6.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/dump-parse-tree.c
    trunk/gcc/fortran/gfortran.h
    trunk/gcc/fortran/interface.c
    trunk/gcc/fortran/module.c
    trunk/gcc/fortran/primary.c
    trunk/gcc/fortran/symbol.c
    trunk/gcc/testsuite/ChangeLog