https://gcc.gnu.org/bugzilla/show_bug.cgi?id=56423
Thomas Koenig <tkoenig at gcc dot gnu.org> changed:
What |Removed |Added
----------------------------------------------------------------------------
Last reconfirmed|2015-10-10 00:00:00 |2025-2-9
CC| |tkoenig at gcc dot gnu.org
--- Comment #3 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
> $ cat z2.f90
> program p
> integer, target :: x(3) = [7, 8, 9]
> type t
> integer, pointer :: a(:)
> end type
> type(t) :: z
> z = t(x(2))
> print *, z%a
> end
>
>
This now gives