[Bug fortran/17584] New: gfortran: ICE with segfault on valid code w/ allocate within derived type

["anlauf at hep dot tu-darmstadt dot de" <gcc-bugzilla at gcc dot gnu dot org>]

OK guys, here's a nasty one:

module gfcbug12
  implicit none

  type t2
     integer            :: i
  end type t2

  type t1
     type (t2), pointer :: k(:)
  end type t1

contains

  subroutine foo ()
    type (t1) :: v
    allocate (v% k(3))
  end subroutine foo

end module gfcbug12


which gives:

gfcbug12.f90: In function `foo':
gfcbug12.f90:16: internal compiler error: Segmentation fault
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.

Cheers,
-ha

-- 
           Summary: gfortran: ICE with segfault on valid code w/ allocate
                    within derived type
           Product: gcc
           Version: 4.0.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: anlauf at hep dot tu-darmstadt dot de
                CC: gcc-bugs at gcc dot gnu dot org
  GCC host triplet: i686-pc-cygwin


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