(root)/
gcc-13.2.0/
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  }