|
111
|
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
|
