[Bug fortran/58026] New: internal compiler error: in generate_finalization_wrapper, at fortran/class.c:1521

[Joost.VandeVondele at mat dot ethz.ch]

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

            Bug ID: 58026
           Summary: internal compiler error: in
                    generate_finalization_wrapper, at fortran/class.c:1521
           Product: gcc
           Version: 4.9.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: Joost.VandeVondele at mat dot ethz.ch

Following invalid testcase yields and ICE with current trunk.

> cat small.f90
  type sysmtx_t
     type(ext_complex_t), allocatable :: S(:)       ! Block scales
  end type sysmtx_t
contains
  subroutine init (this, n, n_e, n_i, n_o)
    class(sysmtx_t), intent(out) :: this

> gfortran small.f90
small.f90:2.40:

     type(ext_complex_t), allocatable :: S(:)       ! Block scales
                                        1
Error: Derived type at (1) has not been previously defined and so cannot appear
in a derived type definition
f951: internal compiler error: in generate_finalization_wrapper, at
fortran/class.c:1521
0x54f091 generate_finalization_wrapper
    ../../gcc/gcc/fortran/class.c:1520
0x54f091 gfc_find_derived_vtab(gfc_symbol*)
    ../../gcc/gcc/fortran/class.c:2394
0x54fc82 gfc_build_class_symbol(gfc_typespec*, symbol_attribute*,
gfc_array_spec**, bool)