https://gcc.gnu.org/bugzilla/show_bug.cgi?id=93686
G. Steinmetz <gs...@t-online.de> changed: What |Removed |Added ---------------------------------------------------------------------------- Keywords| |ice-on-invalid-code --- Comment #1 from G. Steinmetz <gs...@t-online.de> --- Additional test cases : $ cat z2.f90 program p type t integer :: a = 1 end type type(t), pointer :: x data x /t(2)/ end $ cat z3.f90 program p type t end type type(t), pointer :: x data x /t()/ end $ cat z4.f90 type t end type type(t), pointer :: x data x / end