PR target/83368

[official-gcc.git] / gcc / testsuite / gfortran.dg / graphite / id-pr47691.f

! { dg-options "-O -fgraphite-identity -ffast-math -fno-tree-scev-cprop" }
      dimension b(12,8)
      do i=1,norb
      end do
      b(i,j) = 0
      call rdrsym(b)
      end