Sign in
gnu
/
gcc
/
fba228e259dd5112851527f2dbb62c5601100985
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
forall_2.f90
blob: 223c2cea79e810557c170249e7c3202e51b8d6c0 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
PR fortran
/
25101
--
Stride
must be nonzero
.
program forall_2
integer
::
a
(
10
),
j
(
2
),
i
forall
(
i
=
1
:
2
:
0
)
!
{
dg
-
error
"stride expression at"
}
a
(
i
)=
1
end
forall
end
program forall_2