1*330d8983SJohannes Doerfert // RUN: %libomptarget-compile-run-and-check-generic
2*330d8983SJohannes Doerfert
3*330d8983SJohannes Doerfert // REQUIRES: unified_shared_memory
4*330d8983SJohannes Doerfert // UNSUPPORTED: clang-6, clang-7, clang-8, clang-9
5*330d8983SJohannes Doerfert
6*330d8983SJohannes Doerfert #include <assert.h>
7*330d8983SJohannes Doerfert #include <omp.h>
8*330d8983SJohannes Doerfert #include <stdio.h>
9*330d8983SJohannes Doerfert
10*330d8983SJohannes Doerfert #pragma omp requires unified_shared_memory
11*330d8983SJohannes Doerfert
main(int argc,char * argv[])12*330d8983SJohannes Doerfert int main(int argc, char *argv[]) {
13*330d8983SJohannes Doerfert int dev = omp_get_default_device();
14*330d8983SJohannes Doerfert int x = 10;
15*330d8983SJohannes Doerfert int *x_dev = (int *)omp_target_alloc(sizeof x, dev);
16*330d8983SJohannes Doerfert assert(x_dev && "expected omp_target_alloc to succeed");
17*330d8983SJohannes Doerfert int rc = omp_target_associate_ptr(&x, x_dev, sizeof x, 0, dev);
18*330d8983SJohannes Doerfert assert(!rc && "expected omp_target_associate_ptr to succeed");
19*330d8983SJohannes Doerfert
20*330d8983SJohannes Doerfert // To determine whether x needs to be transfered, the runtime cannot simply
21*330d8983SJohannes Doerfert // check whether unified shared memory is enabled and the 'close' modifier is
22*330d8983SJohannes Doerfert // specified. It must check whether x was previously placed in device memory
23*330d8983SJohannes Doerfert // by, for example, omp_target_associate_ptr.
24*330d8983SJohannes Doerfert #pragma omp target map(always, tofrom : x)
25*330d8983SJohannes Doerfert x += 1;
26*330d8983SJohannes Doerfert
27*330d8983SJohannes Doerfert // CHECK: x=11
28*330d8983SJohannes Doerfert printf("x=%d\n", x);
29*330d8983SJohannes Doerfert // CHECK: present: 1
30*330d8983SJohannes Doerfert printf("present: %d\n", omp_target_is_present(&x, dev));
31*330d8983SJohannes Doerfert
32*330d8983SJohannes Doerfert return 0;
33*330d8983SJohannes Doerfert }
34