1 // RUN: %libomptarget-compilexx-run-and-check-generic
2 
3 // Wrong results on amdgpu
4 // XFAIL: amdgcn-amd-amdhsa
5 // XFAIL: amdgcn-amd-amdhsa-newRTL
6 
7 #include <stdio.h>
8 #include <stdint.h>
9 
10 // CHECK: before: [[V1:111]] [[V2:222]] [[PX:0x[^ ]+]] [[PY:0x[^ ]+]]
11 // CHECK: lambda: [[V1]] [[V2]] [[PX_TGT:0x[^ ]+]] 0x{{.*}}
12 // CHECK: tgt   : [[V2]] [[PX_TGT]] 1
13 // CHECK: out   : [[V2]] [[V2]] [[PX]] [[PY]]
14 
15 int main() {
16   int x[10];
17   long y[8];
18   x[1] = 111;
19   y[1] = 222;
20 
21   auto lambda = [&x, y]() {
22     printf("lambda: %d %ld %p %p\n", x[1], y[1], &x[0], &y[0]);
23     x[1] = y[1];
24   };
25 
26   printf("before: %d %ld %p %p\n", x[1], y[1], &x[0], &y[0]);
27 
28   intptr_t xp = (intptr_t) &x[0];
29 #pragma omp target firstprivate(xp)
30   {
31     lambda();
32     printf("tgt   : %d %p %d\n", x[1], &x[0], (&x[0] != (int*) xp));
33   }
34   printf("out   : %d %ld %p %p\n", x[1], y[1], &x[0], &y[0]);
35 
36   return 0;
37 }
38 
39