1/* PR tree-optimization/58472 */
2/* { dg-do compile } */
3/* { dg-options "-O2 -Wall -fopenmp" } */
4
5float a[1024], b[1024];
6
7float
8foo ()
9{
10 float s = 0.f;
11 unsigned int i;
12#pragma omp simd reduction(+:s)
13 for (i = 0; i < 1024; ++i)
14 s += a[i] * b[i];
15 return s;
16}
17