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

     1  extern void abort (void);
     2  
     3  _Complex v = 3.0 + 1.0iF;
     4  
     5  void
     6  foo (_Complex z, int *x)
     7  {
     8    if (z != v)
     9      abort ();
    10  }
    11  
    12  _Complex bar (_Complex z) __attribute__ ((pure));
    13  _Complex
    14  bar (_Complex z)
    15  {
    16    return v;
    17  }
    18  
    19  int
    20  baz (void)
    21  {
    22    int a, i;
    23    for (i = 0; i < 6; i++)
    24      foo (bar (1.0iF * i), &a);
    25    return 0;
    26  }
    27  
    28  int
    29  main ()
    30  {
    31    baz ();
    32    return 0;
    33  }