(root)/
gcc-13.2.0/
gcc/
testsuite/
c-c++-common/
gomp/
scope-2.c
       1  int r, r2, r3 = 1;
       2  int bar (void);
       3  
       4  void
       5  foo (void)
       6  {
       7    int i = 0, j = 0, k = 0;
       8    #pragma omp parallel
       9    {
      10      if (bar ())
      11        {
      12  	#pragma omp cancel parallel
      13        }
      14      #pragma omp scope reduction (+:r) private (i)
      15      {
      16        #pragma omp scope reduction (+:r2) private (j)
      17        {
      18  	#pragma omp single nowait
      19  	{
      20  	  i = 1;
      21  	  j = 2;
      22  	  r++;
      23  	  r2++;
      24  	}
      25        }
      26      }
      27    }
      28    #pragma omp parallel
      29    {
      30      if (bar ())
      31        {
      32  	#pragma omp cancel parallel
      33        }
      34      #pragma omp scope reduction (task, +:r) private (i)
      35      #pragma omp scope reduction (task, *:r3)
      36      {
      37        r++;
      38        r3++;
      39      }
      40    }
      41  }