Several cleanups/fixes from Marshall M. Midden <m4@brecis.com>

9 files changed, 19 insertions, 14 deletions

diff --git a/libm/e_exp.c b/libm/e_exp.c
index 9eba853c8..734166733 100644
--- a/libm/e_exp.c
+++ b/libm/e_exp.c
@@ -110,8 +110,13 @@ P5   =  4.13813679705723846039e-08; /* 0x3E663769, 0x72BEA4D0 */
 	double x;
 #endif
 {
-	double y,hi,lo,c,t;
-	int32_t k,xsb;
+	double y;
+	double hi = 0;
+	double lo = 0;
+	double c;
+	double t;
+	int32_t k=0;
+	int32_t xsb;
 	u_int32_t hx;
 
 	GET_HIGH_WORD(hx,x);
diff --git a/libm/e_j0.c b/libm/e_j0.c
index 56930c688..46fa16656 100644
--- a/libm/e_j0.c
+++ b/libm/e_j0.c
@@ -332,7 +332,7 @@ static double pS2[5] = {
 #endif
 {
 #ifdef __STDC__
-	const double *p,*q;
+	const double *p = 0,*q = 0;
 #else
 	double *p,*q;
 #endif
@@ -468,7 +468,7 @@ static double qS2[6] = {
 #endif
 {
 #ifdef __STDC__
-	const double *p,*q;
+	const double *p=0,*q=0;
 #else
 	double *p,*q;
 #endif
diff --git a/libm/e_j1.c b/libm/e_j1.c
index 3e1a3f1f7..5eb81ee73 100644
--- a/libm/e_j1.c
+++ b/libm/e_j1.c
@@ -330,7 +330,7 @@ static double ps2[5] = {
 #endif
 {
 #ifdef __STDC__
-	const double *p,*q;
+	const double *p=0,*q=0;
 #else
 	double *p,*q;
 #endif
@@ -467,7 +467,7 @@ static double qs2[6] = {
 #endif
 {
 #ifdef __STDC__
-	const double *p,*q;
+	const double *p=0,*q=0;
 #else
 	double *p,*q;
 #endif
diff --git a/libm/e_jn.c b/libm/e_jn.c
index 27a8a1969..870824cf8 100644
--- a/libm/e_jn.c
+++ b/libm/e_jn.c
@@ -66,7 +66,7 @@ static double zero  =  0.00000000000000000000e+00;
 #endif
 {
 	int32_t i,hx,ix,lx, sgn;
-	double a, b, temp, di;
+	double a, b, temp=0, di;
 	double z, w;
 
     /* J(-n,x) = (-1)^n * J(n, x), J(n, -x) = (-1)^n * J(n, x)
@@ -227,7 +227,7 @@ static double zero  =  0.00000000000000000000e+00;
 {
 	int32_t i,hx,ix,lx;
 	int32_t sign;
-	double a, b, temp;
+	double a, b, temp=0;
 
 	EXTRACT_WORDS(hx,lx,x);
 	ix = 0x7fffffff&hx;
diff --git a/libm/e_lgamma_r.c b/libm/e_lgamma_r.c
index 16121722a..2b92ea2a2 100644
--- a/libm/e_lgamma_r.c
+++ b/libm/e_lgamma_r.c
@@ -223,7 +223,7 @@ __inline__
 	double x; int *signgamp;
 #endif
 {
-	double t,y,z,nadj,p,p1,p2,p3,q,r,w;
+	double t,y,z,nadj=0,p,p1,p2,p3,q,r,w;
 	int i,hx,lx,ix;
 
 	EXTRACT_WORDS(hx,lx,x);
diff --git a/libm/e_rem_pio2.c b/libm/e_rem_pio2.c
index a8a8cdb2b..85dbaac6d 100644
--- a/libm/e_rem_pio2.c
+++ b/libm/e_rem_pio2.c
@@ -90,7 +90,7 @@ pio2_3t =  8.47842766036889956997e-32; /* 0x397B839A, 0x252049C1 */
 	double x,y[];
 #endif
 {
-	double z,w,t,r,fn;
+	double z=0,w,t,r,fn;
 	double tx[3];
 	int32_t e0,i,j,nx,n,ix,hx;
 	u_int32_t low;
diff --git a/libm/math_private.h b/libm/math_private.h
index cdb5f332a..bfc3365c4 100644
--- a/libm/math_private.h
+++ b/libm/math_private.h
@@ -11,7 +11,7 @@
 
 /*
  * from: @(#)fdlibm.h 5.1 93/09/24
- * $Id: math_private.h,v 1.1 2001/11/22 14:01:05 andersen Exp $
+ * $Id: math_private.h,v 1.2 2002/06/26 09:10:51 andersen Exp $
  */
 
 #ifndef _MATH_PRIVATE_H_
diff --git a/libm/s_expm1.c b/libm/s_expm1.c
index 301416be2..79783d9ba 100644
--- a/libm/s_expm1.c
+++ b/libm/s_expm1.c
@@ -138,7 +138,7 @@ Q5  =  -2.01099218183624371326e-07; /* BE8AFDB7 6E09C32D */
 	double x;
 #endif
 {
-	double y,hi,lo,c,t,e,hxs,hfx,r1;
+	double y,hi,lo,c=0,t,e,hxs,hfx,r1;
 	int32_t k,xsb;
 	u_int32_t hx;
 
diff --git a/libm/s_log1p.c b/libm/s_log1p.c
index d48c3ef7a..6c8739471 100644
--- a/libm/s_log1p.c
+++ b/libm/s_log1p.c
@@ -111,8 +111,8 @@ static double zero = 0.0;
 	double x;
 #endif
 {
-	double hfsq,f,c,s,z,R,u;
-	int32_t k,hx,hu,ax;
+	double hfsq,f=0,c=0,s,z,R,u;
+	int32_t k,hx,hu=0,ax;
 
 	GET_HIGH_WORD(hx,x);
 	ax = hx&0x7fffffff;