RISC-V: Regenerate opt urls.
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr94329.f90
blob9efcf4b65242d9c0604578e9d41bbd839d7250af
1 ! PR tree-optimization/94329
2 ! { dg-do compile }
3 ! { dg-options "-O1 -fno-tree-loop-optimize -fwrapv -fcompare-debug" }
5 subroutine pr94329 (s, t)
6 real :: s, t(:,:)
7 do i = 1,3
8 do j = 1,3
9 s = t(i,j)
10 end do
11 end do
12 end