libgomp/testsuite/libgomp.oacc-c-c++-common/zero_length_subarrays.c

   1 /* Exercise zero-length sub-arrays.  */
   2
   3 const int n = 10;
   4
   5 void
   6 subzero_present (int *a, int n)
   7 {
   8 #pragma acc data present (a[0:n])
   9   ;
  10 #pragma acc data pcopy (a[0:n])
  11   ;
  12 #pragma acc data pcopyin (a[0:n])
  13   ;
  14 #pragma acc data pcopyout (a[0:n])
  15   ;
  16
  17 }
  18
  19 void
  20 subzero (int *a, int n)
  21 {
  22 #pragma acc data create (a[0:n])
  23   ;
  24 #pragma acc data copy (a[0:n])
  25   ;
  26 #pragma acc data copyin (a[0:n])
  27   ;
  28 #pragma acc data copyout (a[0:n])
  29   ;
  30 }
  31
  32 int
  33 main ()
  34 {
  35   int a[n];
  36
  37 #pragma acc data copy (a[0:n])
  38   {
  39     subzero_present (a, 0);
  40   }
  41
  42   subzero (a, 0);
  43
  44   return 0;
  45 }