[Bug fortran/57639] [OOP] ICE with polymorphism (and illegal code)

[janus at gcc dot gnu.org]

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

janus at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2013-06-20
                 CC|                            |janus at gcc dot gnu.org
            Summary|ICE with polymorphism (and  |[OOP] ICE with polymorphism
                   |illegal code)               |(and illegal code)
     Ever confirmed|0                           |1

--- Comment #1 from janus at gcc dot gnu.org ---
Confirmed. Thanks for reporting!

Slightly reduced test case:


  implicit none

  class(*) :: t1, t2

  print *, 'main: compare = ', compare (t1, t2)

contains

 logical function compare (a, b)
    class(*), intent(in), allocatable :: a, b
  end function  

end