https://gcc.gnu.org/bugzilla/show_bug.cgi?id=93833
G. Steinmetz <gs...@t-online.de> changed:
What |Removed |Added
----------------------------------------------------------------------------
Keywords| |ice-on-valid-code
--- Comment #4 from G. Steinmetz <gs...@t-online.de> ---
That example z1.f90 was obviously oversimplified and shrunk too much,
here is a better one :
$ cat z2.f90
program p
character(:), allocatable :: c
c = 'abc'
call s
contains
subroutine s
associate (y => [c])
if (any(y /= [c])) stop
end associate
end
end
