gcc/testsuite/gcc.dg/gomp/workshare-reduction-51.c

   1 /* { dg-do compile } */
   2 /* { dg-options "-O2 -fopenmp -fdump-tree-optimized" } */
   3 /* { dg-final { scan-tree-dump-times "__builtin_GOMP_loop_ordered_start \[^\n\r]*, (?:2147483648|-2147483648), 0, " 1 "optimized" } } */
   4 /* { dg-final { scan-tree-dump-times "__builtin_GOMP_loop_end " 1 "optimized" } } */
   5 /* { dg-final { scan-tree-dump-times "__builtin_GOMP_ordered_start " 1 "optimized" } } */
   6 /* { dg-final { scan-tree-dump-times "__builtin_GOMP_ordered_end " 1 "optimized" } } */
   7 /* { dg-final { scan-tree-dump-times "__builtin_GOMP_loop_ordered_runtime_next " 1 "optimized" } } */
   8 /* { dg-final { scan-tree-dump-times "__builtin_GOMP_workshare_task_reduction_unregister \\(0\\)" 1 "optimized" } } */
   9 /* { dg-final { scan-tree-dump-times "__builtin_GOMP_parallel " 1 "optimized" } } */
  10
  11 int j;
  12 void bar (int *);
  13
  14 void
  15 foo (int a, int b, int c)
  16 {
  17   int i;
  18   #pragma omp parallel
  19   #pragma omp for ordered reduction (task, *: j) schedule (runtime)
  20   for (i = a; i < b; i += c)
  21     {
  22       bar (&j);
  23       #pragma omp ordered
  24       j++;
  25     }
  26 }