[Bug fortran/47745] [OOP] Segfault with CLASS(*) and derived type dummy arguments

[janus at gcc dot gnu.org]

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

janus at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2011.02.15 10:09:26
     Ever Confirmed|0                           |1

--- Comment #2 from janus at gcc dot gnu.org 2011-02-15 10:09:26 UTC ---
With 4.6 trunk I get:


crashme.f08:8.23:

                class(*), intent(in) :: x
                       1
Error: Invalid character in name at (1)
crashme.f08:6.29:

        class(T) function add(d, x)
                             1
Error: CLASS variable 'add' at (1) must be dummy, allocatable or pointer
f951: internal compiler error: Segmentation fault



I think the test case is actually invalid due to C407 in the Fortran 2008
standard (cf. second error message):

C407 An entity declared with the CLASS keyword shall be a dummy argument or
have the ALLOCATABLE or POINTER attribute.