4 integer, parameter :: N
= 64
5 real, allocatable
:: a(:), b(:)
14 !$acc wait async (1 2) ! { dg-error "Unclassifiable OpenACC directive" }
16 !$acc wait async (1,) ! { dg-error "Unclassifiable OpenACC directive" }
18 !$acc wait async (,1) ! { dg-error "Invalid character in name" }
20 !$acc wait async (1, 2, ) ! { dg-error "Unclassifiable OpenACC directive" }
22 !$acc wait async (1, 2, ,) ! { dg-error "Unclassifiable OpenACC directive" }
24 !$acc wait async (1 ! { dg-error "Unclassifiable OpenACC directive" }
26 !$acc wait async (1, *) ! { dg-error "Unclassifiable OpenACC directive" }
28 !$acc wait async (1, a) ! { dg-error "Unclassifiable OpenACC directive" }
30 !$acc wait async (a) ! { dg-error "ASYNC clause at \\\(1\\\) requires a scalar INTEGER expression" }
34 !$acc wait async (1.0) ! { dg-error "ASYNC clause at \\\(1\\\) requires a scalar INTEGER expression" }
36 !$acc wait async 1 ! { dg-error "Unclassifiable OpenACC directive" }
38 !$acc waitasync ! { dg-error "Unclassifiable OpenACC directive" }
40 !$acc wait,async ! { dg-error "Unclassifiable OpenACC directive" }