1 /* Copyright (C) 2003 Free Software Foundation.
3 Check that cabs of a non-complex argument is converted into fabs.
5 Written by Roger Sayle, 1st June 2003. */
8 /* { dg-options "-O2 -ffast-math" } */
10 double cabs (__complex__ double);
11 float cabsf (__complex__ float);
12 long double cabsl (__complex__ long double);
15 long double fabsl (long double);
17 void link_error (void);
21 if (cabs (x) != fabs (x))
27 if (cabsf (x) != fabsf (x))
31 void testl (long double x)
33 if (cabsl (x) != fabsl (x))