From c50eee19c447d3f2c182dc3a22f2b01a053dca41 Mon Sep 17 00:00:00 2001 From: "Paul E. Murphy" Date: Tue, 28 Jun 2016 08:49:23 -0500 Subject: Convert _Complex sine functions to generated code Refactor s_c{,a}sin{,h}{f,,l} into a single templated macro. --- math/s_casin_template.c | 31 ++++++++++++++++--------------- 1 file changed, 16 insertions(+), 15 deletions(-) (limited to 'math/s_casin_template.c') diff --git a/math/s_casin_template.c b/math/s_casin_template.c index a37933b597..5b1e979a16 100644 --- a/math/s_casin_template.c +++ b/math/s_casin_template.c @@ -1,4 +1,4 @@ -/* Return arc sine of complex double value. +/* Return arc sine of a complex float type. Copyright (C) 1997-2016 Free Software Foundation, Inc. This file is part of the GNU C Library. Contributed by Ulrich Drepper , 1997. @@ -22,36 +22,36 @@ #include -__complex__ double -__casin (__complex__ double x) +CFLOAT +M_DECL_FUNC (__casin) (CFLOAT x) { - __complex__ double res; + CFLOAT res; if (isnan (__real__ x) || isnan (__imag__ x)) { - if (__real__ x == 0.0) + if (__real__ x == 0) { res = x; } else if (isinf (__real__ x) || isinf (__imag__ x)) { - __real__ res = __nan (""); - __imag__ res = __copysign (HUGE_VAL, __imag__ x); + __real__ res = M_NAN; + __imag__ res = M_COPYSIGN (M_HUGE_VAL, __imag__ x); } else { - __real__ res = __nan (""); - __imag__ res = __nan (""); + __real__ res = M_NAN; + __imag__ res = M_NAN; } } else { - __complex__ double y; + CFLOAT y; __real__ y = -__imag__ x; __imag__ y = __real__ x; - y = __casinh (y); + y = M_SUF (__casinh) (y); __real__ res = __imag__ y; __imag__ res = -__real__ y; @@ -59,8 +59,9 @@ __casin (__complex__ double x) return res; } -weak_alias (__casin, casin) -#ifdef NO_LONG_DOUBLE -strong_alias (__casin, __casinl) -weak_alias (__casin, casinl) + +declare_mgen_alias (__casin, casin) + +#if M_LIBM_NEED_COMPAT (casin) +declare_mgen_libm_compat (__casin, casin) #endif -- cgit v1.2.3