libgomp/testsuite/libgomp.oacc-c-c++-common/enter-data.c

   1 /* This test verifies that the present data clauses to acc enter data
   2    don't cause duplicate mapping failures at runtime.  */
   3
   4 /* { dg-do run } */
   5
   6 #include <stdlib.h>
   7
   8 int
   9 main (void)
  10 {
  11   int a;
  12
  13 #pragma acc enter data copyin (a)
  14 #pragma acc enter data pcopyin (a)
  15 #pragma acc enter data pcreate (a)
  16 #pragma acc exit data delete (a)
  17
  18 #pragma acc enter data create (a)
  19 #pragma acc enter data pcreate (a)
  20 #pragma acc exit data delete (a)
  21
  22   return 0;
  23 }