libgomp/testsuite/libgomp.oacc-c-c++-common/lib-31.c

   1 /* { dg-do run } */
   2
   3 #include <stdlib.h>
   4 #include <openacc.h>
   5
   6 int
   7 main (int argc, char **argv)
   8 {
   9   const int N = 256;
  10   unsigned char *h;
  11   void *d;
  12
  13   h = (unsigned char *) malloc (N);
  14
  15   d = acc_present_or_create (h, N);
  16   if (!d)
  17     abort ();
  18
  19   if (acc_is_present (h, 1) != 1)
  20     abort ();
  21
  22   acc_delete (h, N);
  23
  24   free (h);
  25
  26   return 0;
  27 }