1 void
fun(void)2 fun (void)
3 {
4   float *fp;
5 #pragma acc parallel copy(fp[0:2],fp[0:2]) /* { dg-error "'fp' appears more than once in data clauses" } */
6   ;
7 #pragma acc kernels present_or_copyin(fp[3]) present_or_copyout(fp[7:4]) /* { dg-error "'fp' appears more than once in data clauses" } */
8   ;
9 #pragma acc data create(fp[:10]) deviceptr(fp) /* { dg-error "'fp' appears more than once in data clauses" } */
10   ;
11 #pragma acc data create(fp) present(fp) /* { dg-error "'fp' appears more than once in data clauses" } */
12   ;
13 }
14