diff options
Diffstat (limited to 'libm/s_expm1.c')
| -rw-r--r-- | libm/s_expm1.c | 16 |
1 files changed, 1 insertions, 15 deletions
diff --git a/libm/s_expm1.c b/libm/s_expm1.c index 4eab15c43..8e51ae748 100644 --- a/libm/s_expm1.c +++ b/libm/s_expm1.c @@ -1,4 +1,3 @@ -/* @(#)s_expm1.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: s_expm1.c,v 1.8 1995/05/10 20:47:09 jtc Exp $"; -#endif - /* expm1(x) * Returns exp(x)-1, the exponential of x minus 1. * @@ -112,11 +107,7 @@ static char rcsid[] = "$NetBSD: s_expm1.c,v 1.8 1995/05/10 20:47:09 jtc Exp $"; #include "math.h" #include "math_private.h" -#ifdef __STDC__ static const double -#else -static double -#endif one = 1.0, huge = 1.0e+300, tiny = 1.0e-300, @@ -131,12 +122,7 @@ Q3 = -7.93650757867487942473e-05, /* BF14CE19 9EAADBB7 */ Q4 = 4.00821782732936239552e-06, /* 3ED0CFCA 86E65239 */ Q5 = -2.01099218183624371326e-07; /* BE8AFDB7 6E09C32D */ -#ifdef __STDC__ - double expm1(double x) -#else - double expm1(x) - double x; -#endif +double expm1(double x) { double y,hi,lo,c=0.0,t,e,hxs,hfx,r1; int32_t k,xsb; |