gcc/testsuite/gfortran.dg/bounds_check_6.f90 - gcc - Git at Google

 ! { dg-do run }
 ! { dg-options "-fbounds-check" }
 !
 ! Testcase for PR30655, we used to issue a compile-time warning
   integer i(12), j
   j = -1
   i(0:j) = 42
   end
	! { dg-do run }
	! { dg-options "-fbounds-check" }
	!
	! Testcase for PR30655, we used to issue a compile-time warning
	integer i(12), j
	j = -1
	i(0:j) = 42
	end