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

     1  /* Derived from PR optimization/11700.  */
     2  /* The compiler used to ICE during reload for m68k targets.  */
     3  
     4  void check_complex (__complex__ double, __complex__ double,
     5                      __complex__ double, __complex__ int);
     6  void check_float (double, double, double, int);
     7  extern double _Complex conj (double _Complex);
     8  extern double carg (double _Complex __z);
     9  
    10  static double minus_zero;
    11  
    12  void
    13  conj_test (void)
    14  {
    15    check_complex (conj (({ __complex__ double __retval;
    16  			  __real__ __retval = (0.0);
    17  			  __imag__ __retval = (0.0);
    18  			  __retval; })),
    19  		 ({ __complex__ double __retval;
    20  		    __real__ __retval = (0.0);
    21  		    __imag__ __retval = (minus_zero);
    22  		    __retval; }), 0, 0);
    23  }
    24  
    25  void
    26  carg_test (void)
    27  {
    28    check_float (carg (({ __complex__ double __retval;
    29  			__real__ __retval = (2.0);
    30  			__imag__ __retval = (0);
    31  			__retval; })), 0, 0, 0);
    32  }
    33