1! { dg-do compile }
2
3program test
4  integer a, b(100)
5
6  !$acc parallel firstprivate (a, b)
7  !$acc end parallel
8
9  !$acc parallel firstprivate (b(10:20)) ! { dg-error "Syntax error in OpenMP variable list" }
10  !$acc end parallel ! { dg-error "Unexpected !\\\$ACC END PARALLEL statement" }
11end program test
12