https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68426
Dominique d'Humieres <dominiq at lps dot ens.fr> changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |NEW
Last reconfirmed| |2015-11-19
Ever confirmed|0 |1
--- Comment #1 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
The second PARAMETER is not needed: compiling the following code
module m
implicit none
type t
integer :: i
end type t
type(t), dimension(2), parameter :: a1 = (/ t(1), t(2) /)
type(t), dimension(1) :: c = spread ( a1(1), 1, 1 )
end module m
gives the same ICE
f951: internal compiler error: in gfc_conv_array_initializer, at
fortran/trans-array.c:5704
