1 // { dg-do assemble  }
2 
3 // Copyright (c) 2000, 2001 Free Software Foundation.
4 // Distilled from a bug report by Eric Ford <eford@princeton.edu>
5 
6 extern double *y;
7 extern double *x;
8 extern int nPoints;
9 
SetInitCond(void)10 void SetInitCond(void)
11 {
12   int i;
13   for(i = 2; i < nPoints; ++i)
14     y[i] = y[nPoints] .* (x[i]-x[1]) / (x[nPoints]-x[1]);  // { dg-error "" } .*
15 }
16