https://gcc.gnu.org/bugzilla/show_bug.cgi?id=99139
G. Steinmetz <gs...@t-online.de> changed:
What |Removed |Added
----------------------------------------------------------------------------
Keywords| |ice-on-valid-code
--- Comment #1 from G. Steinmetz <gs...@t-online.de> ---
This variant compiles ...
$ cat z0.f90
subroutine s(x)
real, target :: x(..)
select rank (y => x)
rank (1)
rank (2)
end select
end
$ gfortran-11-20210214 -c z0.f90
$
... with one exception :
$ gfortran-11-20210214 -c z0.f90 -finit-local-zero # or -finit-real=snan
z0.f90:3:22:
3 | select rank (y => x)
| 1
Error: Assumed-rank variable y at (1) may only be used as actual argument
