projects
/
gcc.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Daily bump.
[gcc.git]
/
libgomp
/
testsuite
/
libgomp.oacc-c-c++-common
/
host_data-4.c
1
/* { dg-do run { target openacc_nvidia_accel_selected } } */
2
3
#include <openacc.h>
4
#include <stdlib.h>
5
6
#define N 1024
7
8
int
main
(
int
argc
,
char
*
argv
[])
9
{
10
int
x
[
N
], *
xp2
;
11
12
#pragma acc data copyin (x[0:N])
13
{
14
int
*
xp
;
15
#pragma acc host_data use_device (x)
16
{
17
#pragma acc data
18
{
19
xp
=
x
;
20
}
21
xp2
=
x
;
22
}
23
24
if
(
xp
!=
acc_deviceptr
(
x
) ||
xp2
!=
xp
)
25
abort
();
26
}
27
28
return
0
;
29
}