[Bug fortran/47180] [OOP] EXTENDS_TYPE_OF returns the wrong result for disassociated polymorphic pointers

[janus at gcc dot gnu.org]

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

--- Comment #5 from janus at gcc dot gnu.org 2011-01-05 18:06:25 UTC ---
Author: janus
Date: Wed Jan  5 18:06:21 2011
New Revision: 168524

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=168524
Log:
2011-01-05  Janus Weil  <ja...@gcc.gnu.org>

    PR fortran/47180
    * trans-expr.c (gfc_trans_class_assign): For a polymorphic NULL pointer
    assignment, set the _vptr component to the declared type.


2011-01-05  Janus Weil  <ja...@gcc.gnu.org>

    PR fortran/47180
    * gfortran.dg/extends_type_of_2.f03: New.

Added:
    trunk/gcc/testsuite/gfortran.dg/extends_type_of_2.f03
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/trans-expr.c
    trunk/gcc/testsuite/ChangeLog