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  }