xref: /llvm-project/offload/test/mapping/present/target_enter_data.c (revision 330d8983d25d08580fc1642fea48b2473f47a9da)
1*330d8983SJohannes Doerfert // RUN: %libomptarget-compile-generic
2*330d8983SJohannes Doerfert // RUN: %libomptarget-run-fail-generic 2>&1 \
3*330d8983SJohannes Doerfert // RUN: | %fcheck-generic
4*330d8983SJohannes Doerfert 
5*330d8983SJohannes Doerfert #include <stdio.h>
6*330d8983SJohannes Doerfert 
main()7*330d8983SJohannes Doerfert int main() {
8*330d8983SJohannes Doerfert   int i;
9*330d8983SJohannes Doerfert 
10*330d8983SJohannes Doerfert   // CHECK: addr=0x[[#%x,HOST_ADDR:]], size=[[#%u,SIZE:]]
11*330d8983SJohannes Doerfert   fprintf(stderr, "addr=%p, size=%ld\n", &i, sizeof i);
12*330d8983SJohannes Doerfert 
13*330d8983SJohannes Doerfert   // CHECK-NOT: omptarget
14*330d8983SJohannes Doerfert #pragma omp target enter data map(alloc : i)
15*330d8983SJohannes Doerfert #pragma omp target enter data map(present, alloc : i)
16*330d8983SJohannes Doerfert #pragma omp target exit data map(delete : i)
17*330d8983SJohannes Doerfert 
18*330d8983SJohannes Doerfert   // CHECK: i is present
19*330d8983SJohannes Doerfert   fprintf(stderr, "i is present\n");
20*330d8983SJohannes Doerfert 
21*330d8983SJohannes Doerfert   // CHECK: omptarget message: device mapping required by 'present' map type modifier does not exist for host address 0x{{0*}}[[#HOST_ADDR]] ([[#SIZE]] bytes)
22*330d8983SJohannes Doerfert   // CHECK: omptarget error: Call to getTargetPointer returned null pointer ('present' map type modifier).
23*330d8983SJohannes Doerfert   // CHECK: omptarget fatal error 1: failure of target construct while offloading is mandatory
24*330d8983SJohannes Doerfert #pragma omp target enter data map(present, alloc : i)
25*330d8983SJohannes Doerfert 
26*330d8983SJohannes Doerfert   // CHECK-NOT: i is present
27*330d8983SJohannes Doerfert   fprintf(stderr, "i is present\n");
28*330d8983SJohannes Doerfert 
29*330d8983SJohannes Doerfert   return 0;
30*330d8983SJohannes Doerfert }
31