gcc/testsuite/gcc.dg/gomp/pr60534.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

/* PR middle-end/60534 */
/* { dg-do compile } */
/* { dg-options "-fopenmp -O -fno-tree-loop-optimize" } */

extern int d[];

int
foo (int a)
{
  int c = 0;
  int l;
#pragma omp simd reduction(+: c)
  for (l = 0; l < a; ++l)
    c += d[l];
  return c;
}