gcc/testsuite/gcc.dg/graphite/run-id-pr42644.c

   1 /* Testcase extracted from test 183.equake in SPEC CPU2000.  */
   2 double Ke[2], ds[2];
   3
   4 void foo(double Ke[2], int i, double ds[],  int column)
   5 {
   6   double tt, ts;
   7   int j;
   8
   9   for (j = 0; j < 2; j++)
  10     {
  11       ++column;
  12       ts = ds[i];
  13       if (i == j)
  14         tt = 123;
  15       else
  16         tt = 0;
  17       Ke[column] = Ke[column] + ts + tt;
  18     }
  19 }
  20
  21 extern void abort ();
  22
  23 int
  24 main ()
  25 {
  26   int i, j;
  27
  28   ds[0] = 1.0;
  29   ds[1] = 1.0;
  30
  31   foo(Ke, 0, ds, -1);
  32
  33   if ((int) Ke[0] != 124)
  34     abort ();
  35
  36   return 0;
  37 }