Sign in
llvm
/
llvm-test-suite
/
refs/heads/main
/
.
/
Fortran
/
gfortran
/
regression
/
pr93835.f08
blob: 2fa1585604b9173263d91cb07d687961da279194 [
file
] [
log
] [
blame
]
!
{
dg
-
do
run
}
!
!
PR fortran
/
93835
-
the following code resulted
in
an ICE
!
program p
if
(
any
(
findloc
(
shape
(
1
),
1
)
.
ne
.
0
))
stop
1
end