OSDN Git Service

PR fortran/45586
authormatz <matz@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 18 Feb 2011 19:52:16 +0000 (19:52 +0000)
committermatz <matz@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 18 Feb 2011 19:52:16 +0000 (19:52 +0000)
commit479b04280172987a099f613f13550ffc8f858270
treeed9bae538119f7a14e04f53cad9c5316df51293e
parentc7f840ef82d8c2e4f4613b1d24e336390952409a
PR fortran/45586
* gfortran.h (struct gfc_component): Add norestrict_decl member.
* trans.h (struct lang_type): Add nonrestricted_type member.
* trans-expr.c (gfc_conv_component_ref): Search fields with correct
parent type.
* trans-types.c (mirror_fields, gfc_nonrestricted_type): New.
(gfc_sym_type): Use it.

testsuite/
PR fortran/45586
* gfortran.dg/lto/pr45586_0.f90: New test.
* gfortran.dg/typebound_proc_20.f90: Ditto.
* gfortran.dg/typebound_proc_21.f90: Ditto.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@170284 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/gfortran.h
gcc/fortran/trans-expr.c
gcc/fortran/trans-types.c
gcc/fortran/trans.h
gcc/testsuite/gfortran.dg/lto/pr45586_0.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/typebound_proc_20.f90 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/typebound_proc_21.f90 [new file with mode: 0644]