https://gcc.gnu.org/bugzilla/show_bug.cgi?id=93794
anlauf at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |anlauf at gcc dot gnu.org
--- Comment #4 from anlauf at gcc dot gnu.org ---
(In reply to Paul Thomas from comment #2)
> Created attachment 47944 [details]
> Patch for the PR
>
> The test below does the right thing and the code is as expected.
>
> Paul
>
> program p
> type t
> character(:), pointer :: a
> end type
> type(t) :: z
> character(4), target :: c = 'abcd'
> z%a => c
> associate (y => z%a)
> print *, y
> end associate
> end
Paul,
are you still working on this?
