AArch64: correct constraint on Upl early clobber alternatives
[official-gcc.git] / gcc / testsuite / gfortran.dg / do_subscript_4.f90
blobc773fe75aff0f779e057b313fe9a5a315d2528c1
1 ! { dg-do compile }
2 ! PR 91424 - this used to warn although the DO loop is zero trip.
3 program main
4 implicit none
5 integer :: i
6 real :: a(2)
7 do i=1,3,-1
8 a(i) = 2.
9 end do
10 print *,a
11 end program main