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

Reply via email to