11 #pragma omp declare target
13 #pragma omp end declare target
18 /* Test to see if pointer attachment works, for scalar pointers,
19 and pointer fields in structures. */
21 int *ptr
= (int *) malloc (sizeof (int) * N
);
24 #pragma omp target map (ptr, ptr[:N])
26 for (int i
= 0; i
< N
; i
++)
33 for (int i
= 0; i
< N
; i
++)
39 #pragma omp target map (s, s.ptr[:N])
41 for (int i
= 0; i
< N
; i
++)
51 for (int i
= 0; i
< N
; i
++)
55 if (s
.a
!= 1 || s
.b
!= 2 || s
.c
!= 0 || s
.d
!= 0)
58 gp
= (int *) malloc (sizeof (int) * N
);
61 for (int i
= 0; i
< N
; i
++)
64 #pragma omp target map (gp[:N])
66 for (int i
= 0; i
< N
; i
++)
73 for (int i
= 0; i
< N
; i
++)