(root)/
gcc-13.2.0/
libgomp/
testsuite/
libgomp.c/
single-2.c
       1  #include <stdlib.h>
       2  
       3  int
       4  main (void)
       5  {
       6    int i;
       7    i = 4;
       8  #pragma omp single copyprivate (i)
       9    {
      10      i = 6;
      11    }
      12    if (i != 6)
      13      abort ();
      14    return 0;
      15  }