summaryrefslogtreecommitdiff
path: root/libm/e_lgamma_r.c
diff options
context:
space:
mode:
authorDenis Vlasenko <vda.linux@googlemail.com>2008-12-22 15:58:54 +0000
committerDenis Vlasenko <vda.linux@googlemail.com>2008-12-22 15:58:54 +0000
commit38b7304e932d52c8a4b250f35a1c8bcf6805d8ca (patch)
treedb12341ab2303620d70b9de8a5d52093a7262f3a /libm/e_lgamma_r.c
parentef9bd8dd3a1a6922839db782157e3f40f3411f32 (diff)
libm/*: mass removal of:
1. static char rcsid[] = "$NetBSD: ..." 2. /* @(#)s_scalbn.c 5.1 93/09/24 */ 3. #ifdef __STDC__ No code changes (verified with objdump)
Diffstat (limited to 'libm/e_lgamma_r.c')
-rw-r--r--libm/e_lgamma_r.c27
1 files changed, 2 insertions, 25 deletions
diff --git a/libm/e_lgamma_r.c b/libm/e_lgamma_r.c
index 42b48b3a6..b578a2cea 100644
--- a/libm/e_lgamma_r.c
+++ b/libm/e_lgamma_r.c
@@ -1,4 +1,3 @@
-/* @(#)er_lgamma.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_lgamma_r.c,v 1.7 1995/05/10 20:45:42 jtc Exp $";
-#endif
-
/* __ieee754_lgamma_r(x, signgamp)
* Reentrant version of the logarithm of the Gamma function
* with user provide pointer for the sign of Gamma(x).
@@ -84,11 +79,7 @@ static char rcsid[] = "$NetBSD: e_lgamma_r.c,v 1.7 1995/05/10 20:45:42 jtc Exp $
#include "math.h"
#include "math_private.h"
-#ifdef __STDC__
static const double
-#else
-static double
-#endif
two52= 4.50359962737049600000e+15, /* 0x43300000, 0x00000000 */
half= 5.00000000000000000000e-01, /* 0x3FE00000, 0x00000000 */
one = 1.00000000000000000000e+00, /* 0x3FF00000, 0x00000000 */
@@ -156,22 +147,13 @@ w4 = -5.95187557450339963135e-04, /* 0xBF4380CB, 0x8C0FE741 */
w5 = 8.36339918996282139126e-04, /* 0x3F4B67BA, 0x4CDAD5D1 */
w6 = -1.63092934096575273989e-03; /* 0xBF5AB89D, 0x0B9E43E4 */
-#ifdef __STDC__
static const double zero= 0.00000000000000000000e+00;
-#else
-static double zero= 0.00000000000000000000e+00;
-#endif
static
#ifdef __GNUC__
__inline__
#endif
-#ifdef __STDC__
- double sin_pi(double x)
-#else
- double sin_pi(x)
- double x;
-#endif
+double sin_pi(double x)
{
double y,z;
int n,ix;
@@ -216,12 +198,7 @@ __inline__
}
-#ifdef __STDC__
- double attribute_hidden __ieee754_lgamma_r(double x, int *signgamp)
-#else
- double attribute_hidden __ieee754_lgamma_r(x,signgamp)
- double x; int *signgamp;
-#endif
+double attribute_hidden __ieee754_lgamma_r(double x, int *signgamp)
{
double t,y,z,nadj=0,p,p1,p2,p3,q,r,w;
int i,hx,lx,ix;