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

   1 /* { dg-do compile } */
   2 /* { dg-options "-O2 -fopenmp -fdump-tree-optimized" } */
   3 /* { dg-final { scan-tree-dump-times "__builtin_GOMP_loop_ull_doacross_start \[^\n\r]*, (?:2147483649|-2147483647), 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_doacross_ull_post " 1 "optimized" } } */
   6 /* { dg-final { scan-tree-dump-times "__builtin_GOMP_doacross_ull_wait " 1 "optimized" } } */
   7 /* { dg-final { scan-tree-dump-times "__builtin_GOMP_loop_ull_static_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 unsigned long long int j;
  12 void bar (unsigned long long int *);
  13
  14 void
  15 foo (unsigned long long int a, unsigned long long int b, unsigned long long int c)
  16 {
  17   unsigned long long int i;
  18   #pragma omp parallel
  19   #pragma omp for ordered(1) reduction (task, *: j)
  20   for (i = a; i < b; i += c)
  21     {
  22       bar (&j);
  23       #pragma omp ordered depend(sink: i - 1)
  24       j++;
  25       #pragma omp ordered depend(source)
  26     }
  27 }