1  /* { dg-do compile } */
       2  /* { dg-options "-O2 -floop-nest-optimize" } */
       3  
       4  void w(int x, double *y)
       5  {
       6    int i, j;
       7    double a;
       8    double c[32];
       9  
      10    for (i = 0; i < x; i++) {
      11        for (j = 0; j < x - i; j++) {
      12  	  c[j] = y[i];
      13        }
      14        y[i] = a;
      15        a += c[0] + y[i];
      16    }
      17  }
      18  
      19  void v(int x, double *y)
      20  {
      21    w(x, y);
      22  }