libgomp/testsuite/libgomp.oacc-c-c++-common/structured-detach-underflow.c

   1 /* { dg-skip-if "" { *-*-* } { "*" } { "-DACC_MEM_SHARED=0" } } */
   2
   3 #include <stdio.h>
   4
   5 int main ()
   6 {
   7   struct {
   8     int *arr;
   9   } mystr;
  10   int localarr[16];
  11   mystr.arr = localarr;
  12
  13   #pragma acc enter data copyin(mystr, localarr[0:16])
  14
  15   #pragma acc data attach(mystr.arr)
  16   {
  17     #pragma acc exit data detach(mystr.arr)
  18     fprintf (stderr, "CheCKpOInT1\n");
  19     /* { dg-output ".*CheCKpOInT1(\n|\r\n|\r)" } */
  20   }
  21   /* { dg-shouldfail "" }
  22      { dg-output "(\n|\r\n|\r)libgomp: attach count underflow(\n|\r\n|\r)$" } */
  23   fprintf (stderr, "CheCKpOInT2\n");
  24
  25   #pragma acc exit data copyout(mystr, localarr[0:16])
  26
  27   return 0;
  28 }