ICE on intent(out) dummy argument with unlimited polymorphic component

[Damian Rouson]

As demonstrated below, having an "intent(out)" dummy argument with an
unlimited polymorphic component generates an internal compiler error
with a December 23 build of gfortran 4.8:

$ cat ice_on_intent_out_with_unlimted.f90
  type foo
    class(*), allocatable :: x
  end type
contains
  subroutine bar(this)
    type(foo), intent(out) :: this
  end
end
$ gfortran ice_on_intent_out_with_unlimted.f90
ice_on_intent_out_with_unlimted.f90: In function 'bar':
ice_on_intent_out_with_unlimted.f90:5:0: internal compiler error:
Segmentation fault: 11
   subroutine bar(this)
 ^

ice_on_intent_out_with_unlimted.f90:5:0: internal compiler error: Abort trap: 6
gfortran: internal compiler error: Abort trap: 6 (program f951)
Abort trap: 6
$ gfortran --version
GNU Fortran (MacPorts gcc48 4.8-20121223_0) 4.8.0 20121223 (experimental)


Damian