ICE when trying to use character (len=:)

[Gunnar Björkman]

Hi,

I got an ICE when I try to compile the following piece of code,

module test_module
 implicit none
 type name_type
    character (len=:), allocatable :: name
 end type name_type
contains
 subroutine set_Name_Type(self,name)
   class(name_type) :: self
   character(len=*) :: name
 end subroutine set_Name_Type
end module test_module

f951.exe: internal compiler error: in gfc_get_derived_type, at
fortran/trans-types.c:2145


Regards,
Gunnar