1! { dg-do run } 2! { dg-options "-fbounds-check" } 3! 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 9