1! PR fortran/84116
2! { dg-do compile }
3
4program pr84116
5   integer :: i, j
6   !$omp simd linear ((i))	! { dg-error "Syntax error" }
7   do i = 1, 2
8   end do
9   !$omp simd linear ()		! { dg-error "Syntax error" }
10   do j = 1, 2
11   end do
12end
13