diff options
Diffstat (limited to 'libm/e_atanh.c')
| -rw-r--r-- | libm/e_atanh.c | 21 |
1 files changed, 1 insertions, 20 deletions
diff --git a/libm/e_atanh.c b/libm/e_atanh.c index c6c47bcfa..673ef0cd6 100644 --- a/libm/e_atanh.c +++ b/libm/e_atanh.c @@ -1,4 +1,3 @@ -/* @(#)e_atanh.c 5.1 93/09/24 */ /* * ==================================================== * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. @@ -10,10 +9,6 @@ * ==================================================== */ -#if defined(LIBM_SCCS) && !defined(lint) -static char rcsid[] = "$NetBSD: e_atanh.c,v 1.8 1995/05/10 20:44:55 jtc Exp $"; -#endif - /* __ieee754_atanh(x) * Method : * 1.Reduced x to positive by atanh(-x) = -atanh(x) @@ -35,25 +30,11 @@ static char rcsid[] = "$NetBSD: e_atanh.c,v 1.8 1995/05/10 20:44:55 jtc Exp $"; #include "math.h" #include "math_private.h" - -#ifdef __STDC__ static const double one = 1.0, huge = 1e300; -#else -static double one = 1.0, huge = 1e300; -#endif -#ifdef __STDC__ static const double zero = 0.0; -#else -static double zero = 0.0; -#endif -#ifdef __STDC__ - double attribute_hidden __ieee754_atanh(double x) -#else - double attribute_hidden __ieee754_atanh(x) - double x; -#endif +double attribute_hidden __ieee754_atanh(double x) { double t; int32_t hx,ix; |