| /* { dg-do run } */ | |
| #include <stdlib.h> | |
| #include <openacc.h> | |
| int | |
| main (int argc, char **argv) | |
| { | |
| const int N = 256; | |
| int i; | |
| unsigned char *h; | |
| h = (unsigned char *) malloc (N); | |
| for (i = 0; i < N; i++) | |
| { | |
| h[i] = i; | |
| } | |
| (void) acc_copyin (h, N); | |
| acc_copyout (h + 1, N - 1); | |
| free (h); | |
| return 0; | |
| } | |
| /* { dg-shouldfail "libgomp: \[\h+,256\] surrounds2 \[\h+,\+255\]" } */ |