modernc.org/ccgo/v3@v3.16.14/lib/testdata/gcc-9.1.0/gcc/testsuite/gcc.c-torture/execute/930628-1.c (about)

     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  }