! { dg-do compile } program test integer a, b(100) !$acc parallel firstprivate (a, b) !$acc end parallel !$acc parallel firstprivate (b(10:20)) ! { dg-error "Syntax error in OpenMP variable list" } !$acc end parallel ! { dg-error "Unexpected !\\\$ACC END PARALLEL statement" } end program test