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

     1  void foo (), bar (), baz ();
     2  int main ()
     3  {
     4    __complex__ double x;
     5    __complex__ float y;
     6    __complex__ long double z;
     7    __real__ x = 1.0;
     8    __imag__ x = 2.0;
     9    foo (x);
    10    __real__ y = 3.0f;
    11    __imag__ y = 4.0f;
    12    bar (y);
    13    __real__ z = 5.0L;
    14    __imag__ z = 6.0L;
    15    baz (z);
    16    exit (0);
    17  }
    18  
    19  void foo (__complex__ double x)
    20  {
    21    if (__real__ x != 1.0 || __imag__ x != 2.0)
    22      abort ();
    23  }
    24  
    25  void bar (__complex__ float x)
    26  {
    27    if (__real__ x != 3.0f || __imag__ x != 4.0f)
    28      abort ();
    29  }
    30  
    31  void baz (__complex__ long double x)
    32  {
    33    if (__real__ x != 5.0L || __imag__ x != 6.0L)
    34      abort ();
    35  }
    36