gcc/testsuite/c-c++-common/goacc/host_data-1.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

/* Test valid use of host_data directive.  */

int v1[3][3];

void
f (void)
{
#pragma acc host_data use_device(v1)
  ;
}


void bar (float *, float *);

void
foo (float *x, float *y)
{
  int n = 1 << 10;
#pragma acc data create(x[0:n]) copyout(y[0:n])
  {
#pragma acc host_data use_device(x,y)
    bar (x, y);
  }
}