(root)/
gcc-13.2.0/
libgomp/
testsuite/
libgomp.c-c++-common/
task-reduction-18.c
       1  /* { dg-do run } */
       2  
       3  int a;
       4  
       5  int
       6  main ()
       7  {
       8    #pragma omp task
       9    {
      10      #pragma omp taskgroup task_reduction (+: a)
      11      {
      12        #pragma omp task in_reduction (+: a)
      13        ++a;
      14      }
      15    }
      16    return 0;
      17  }