blob: 6a5f16eb8f301f6b1fe2b3b2718e67190d4cc553 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
// RUN: %libomptarget-compile-run-and-check-generic
// XFAIL: intelgpu
#include <stdio.h>
typedef struct {
double *dataptr;
int dummy1;
int dummy2;
} DV;
void init(double vertexx[]) {
#pragma omp target map(vertexx[0 : 100])
{
printf("In init: %lf, expected 100.0\n", vertexx[77]);
vertexx[77] = 77.0;
}
}
void change(DV *dvptr) {
#pragma omp target map(dvptr->dataptr[0 : 100]) map(alloc : dvptr -> dataptr)
{
printf("In change: %lf, expected 77.0\n", dvptr->dataptr[77]);
dvptr->dataptr[77] += 1.0;
}
}
int main() {
double vertexx[100];
vertexx[77] = 100.0;
DV dv;
dv.dataptr = &vertexx[0];
#pragma omp target enter data map(to : vertexx[0 : 100])
init(vertexx);
change(&dv);
#pragma omp target exit data map(from : vertexx[0 : 100])
// CHECK: Final: 78.0
printf("Final: %lf\n", vertexx[77]);
}
|
