view gcc/testsuite/c-c++-common/goacc/host_data-1.c @ 111:04ced10e8804

gcc 7
author kono
date Fri, 27 Oct 2017 22:46:09 +0900
parents
children 1830386684a0
line wrap: on
line source

/* 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);
  }
}