fix pr/45972
[official-gcc.git] / gcc / testsuite / gfortran.dg / bounds_check_6.f90
blob6535db76005220a44106008a3c8b3ad572761585
1 ! { dg-do run }
2 ! { dg-options "-fbounds-check" }
4 ! Testcase for PR30655, we used to issue a compile-time warning
5 integer i(12), j
6 j = -1
7 i(0:j) = 42
8 end