Plugins: Add label-text.h to CPPLIB_H so it will be installed [PR115288]

[official-gcc.git] / gcc / testsuite / gfortran.dg / pr68817.f90

! { dg-do compile }
! { dg-options "-O3 -ffast-math" }
      SUBROUTINE TEST(A,B,C)
      DIMENSION B(3),C(1000,10)
      DO I = 1,3
         I3=I*3
         B(1) = B(1) + (C(K,I3+1)-A)
         B(3) = B(3) + (C(K,I3+3)-A)
      ENDDO
      END