libgomp/testsuite/libgomp.oacc-c-c++-common/no_create-2.c

   1 /* Test 'no_create' clause on compute construct, with data not present on the
   2    device.  */
   3
   4 #include <stdlib.h>
   5 #include <stdio.h>
   6
   7 #define N 128
   8
   9 int
  10 main (int argc, char *argv[])
  11 {
  12   int var;
  13   int *arr = (int *) malloc (N * sizeof (*arr));
  14   int *devptr[2];
  15
  16 #pragma acc parallel no_create(var, arr[0:N]) copyout(devptr)
  17   {
  18     devptr[0] = &var;
  19     devptr[1] = &arr[2];
  20   }
  21
  22   if (devptr[0] != &var)
  23     __builtin_abort ();
  24   if (devptr[1] != &arr[2])
  25     __builtin_abort ();
  26
  27   free (arr);
  28
  29   return 0;
  30 }