1/* PR middle-end/60534 */
2/* { dg-do compile } */
3/* { dg-options "-fopenmp -O -fno-tree-loop-optimize" } */
4
5extern int d[];
6
7int
8foo (int a)
9{
10  int c = 0;
11  int l;
12#pragma omp simd reduction(+: c)
13  for (l = 0; l < a; ++l)
14    c += d[l];
15  return c;
16}
17