https://gcc.gnu.org/bugzilla/show_bug.cgi?id=103391
G. Steinmetz <gs...@t-online.de> changed: What |Removed |Added ---------------------------------------------------------------------------- Keywords| |ice-on-valid-code --- Comment #1 from G. Steinmetz <gs...@t-online.de> --- Compiles : $ cat z2.f90 program p type t end type type t2 type(t), pointer :: a(:) end type contains function f(x) class(t), intent(in), target :: x(:) type(t2) :: f f%a => x end end