diff --git a/src/lisp/e_exp.c b/src/lisp/e_exp.c
index 4d94a1e3d5c97f8f774e1054d8dbbd4dc0653ea5..3d84224ccba3f92c6f3907c13e74fc8da79ac74d 100644
--- a/src/lisp/e_exp.c
+++ b/src/lisp/e_exp.c
@@ -106,7 +106,8 @@ P5   =  4.13813679705723846039e-08; /* 0x3E663769, 0x72BEA4D0 */
 #endif
 {
 	double y,hi,lo,c,t;
-	int k,xsb;
+	int k = 0;
+        int xsb;
 	unsigned hx;
 	union { int i[2]; double d; } ux;