gcc/testsuite/gcc.c-torture/execute/930628-1.c

   1 f (double x[2], double y[2])
   2 {
   3   if (x == y)
   4     abort ();
   5 }
   6
   7 main ()
   8 {
   9   struct { int f[3]; double x[1][2]; } tp[4][2];
  10   int i, j, ki, kj, mi, mj;
  11   float bdm[4][2][4][2];
  12
  13   for (i = 0; i < 4; i++)
  14     for (j = i; j < 4; j++)
  15       for (ki = 0; ki < 2; ki++)
  16         for (kj = 0; kj < 2; kj++)
  17           if ((j == i) && (ki == kj))
  18             bdm[i][ki][j][kj] = 1000.0;
  19           else
  20             {
  21               for (mi = 0; mi < 1; mi++)
  22                 for (mj = 0; mj < 1; mj++)
  23                   f (tp[i][ki].x[mi], tp[j][kj].x[mj]);
  24               bdm[i][ki][j][kj] = 1000.0;
  25             }
  26   exit (0);
  27 }