[Bug fortran/56731] [4.7 Regression] [OOP] ICE on (wrongly) referencing polymorphic array in select type

[janus at gcc dot gnu.org]

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

janus at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
            Summary|[4.7 Regression] ICE on     |[4.7 Regression] [OOP] ICE
                   |(wrongly) referencing       |on (wrongly) referencing
                   |polymorphic array in select |polymorphic array in select
                   |type                        |type

--- Comment #7 from janus at gcc dot gnu.org 2013-03-31 20:40:28 UTC ---
Slightly reduced test case:

program polymorph2

    type ta
        integer i
    end type

    type ca
        class(ta), allocatable :: c
    end type

    type(ca) carr(2)

    select type(an => carr%c)
        type is (ta)
    end select

end program