]> git.ipfire.org Git - thirdparty/gcc.git/commit
resolve.c (check_typebound_baseobject): Don't check for abstract types for CLASS.
authorTobias Burnus <burnus@gcc.gnu.org>
Wed, 30 Sep 2009 20:45:07 +0000 (22:45 +0200)
committerTobias Burnus <burnus@gcc.gnu.org>
Wed, 30 Sep 2009 20:45:07 +0000 (22:45 +0200)
commite56817dbc6b6219fc209f7d740e452f3cfb77abe
tree810a3eb7f5ed1d7d3752ab8b18044d6423f8e5a3
parentcf2b3c22a2cbd7f50db530ca9d2b14c70ba0359d
resolve.c (check_typebound_baseobject): Don't check for abstract types for CLASS.

fortran/
2009-09-30  Janus Weil  <janus@gcc.gnu.org>

        * resolve.c (check_typebound_baseobject): Don't check for
        abstract types for CLASS.
        (resolve_class_assign): Adapt for RHS being a CLASS.
        * trans-intrinsic.c (gfc_conv_associated): Add component ref
        if expr is a CLASS.

testsuite/
2009-09-30  Tobias Burnus  <burnus@net-b.de>

        * gfortran.dg/select_type_4.f90: New test.

From-SVN: r152346
gcc/fortran/ChangeLog
gcc/fortran/resolve.c
gcc/fortran/trans-intrinsic.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/select_type_4.f90 [new file with mode: 0644]