1 /* { dg-do compile } */
2 /* { dg-options "-O2 -fschedule-insns" } */
3 
foo(double * d1,double * u1,double * u2,double * d2,int s,int j,int i)4 void foo (double *d1, double *u1, double *u2, double *d2, int s, int j, int i)
5 {
6   int n = 1 << s;
7   double x = 0;
8 
9   for (; j < n; j++)
10     x += d1[j] * d2[i];
11   d1[i] = x;
12 }
13