1 integer :: i
2 !$omp do schedule(static, 1)
3 do i = 1, 10
4 end do
5 !$omp do schedule(static, 0) ! { dg-warning "must be positive" }
6 do i = 1, 10
7 end do
8 !$omp do schedule(static, -7) ! { dg-warning "must be positive" }
9 do i = 1, 10
10 end do
11end
12