ICE with derived type initialization

[John4]

Maybe someone else already reported on this, but... When compiling the code below, I get an Internal Compiler Error ---I'm not sure if the code below is valid; I first tried with ALLOCATABLE instead of POINTER (with NULL() added for the second component), but there seems to be a restriction for that kind of initialization at the declaration level.

!------------------------------------------------------------------------------
module mod1

implicit none
private
save

type, public :: t1
character(63) :: name
character(255), pointer :: txt(:) => NULL()
end type

end module mod1

module mod2

use mod1

implicit none
private
save

type(t1) :: t = t1('something')

end module mod2
!------------------------------------------------------------------------------

[IDZ_A_Intel]

An internal compiler error is always a compiler bug - doesn't matter if your code is legal or not. To the best of my knowledge, your code is legal. I'll report this to the developers. Issue ID is DPD200158131.

[IDZ_A_Intel · Accepted solution]

This bug will be fixed in a future product update - probably the first update after the next major release.