gcc/testsuite/gfortran.dg/forall_2.f90

   1 ! { dg-do compile }
   2 ! PR fortran/25101  -- Stride must be nonzero.
   3 program forall_2
   4    integer :: a(10),j(2),i
   5    forall(i=1:2:0)  ! { dg-error "stride expression at" }
   6      a(i)=1
   7    end forall
   8 end program forall_2
   9