1/* { dg-do run } */ 2 3#include <stdlib.h> 4#include <openacc.h> 5 6int 7main (int argc, char **argv) 8{ 9 const int N = 256; 10 unsigned char *h; 11 void *d1, *d2; 12 13 h = (unsigned char *) malloc (N); 14 15 d1 = acc_present_or_create (h, N); 16 if (!d1) 17 abort (); 18 19 d2 = acc_present_or_create (h, N); 20 if (!d2) 21 abort (); 22 23 if (d1 != d2) 24 abort (); 25 26 d2 = acc_pcreate (h, N); 27 if (!d2) 28 abort (); 29 30 if (d1 != d2) 31 abort (); 32 33 acc_delete (h, N); 34 35 free (h); 36 37 return 0; 38} 39