From 07ef655222e4db5ad4e5fff68b35d05e4ff713a2 Mon Sep 17 00:00:00 2001
From: Guido van Rossum <guido@python.org>
Date: Thu, 2 Jan 1997 22:31:07 +0000
Subject: [PATCH] Oops -- unpack float/double didn't do the right thing if
 e==0.

---
 Modules/structmodule.c | 18 ++++++++++++++----
 1 file changed, 14 insertions(+), 4 deletions(-)

diff --git a/Modules/structmodule.c b/Modules/structmodule.c
index 23b820bd6f3..ef139122d5c 100644
--- a/Modules/structmodule.c
+++ b/Modules/structmodule.c
@@ -402,8 +402,13 @@ unpack_float(p, incr)
 	x = (double)f / 8388608.0;
 
 	/* XXX This sadly ignores Inf/NaN issues */
-	if (e != 0)
-		x = ldexp(1.0 + x, e - 127);
+	if (e == 0)
+		e = -126;
+	else {
+		x += 1.0;
+		e -= 127;
+	}
+	x = ldexp(x, e);
 
 	if (s)
 		x = -x;
@@ -459,8 +464,13 @@ unpack_double(p, incr)
 	x /= 268435456.0; /* 2**28 */
 
 	/* XXX This sadly ignores Inf/NaN */
-	if (e != 0)
-		x = ldexp(1.0 + x, e - 1023);
+	if (e == 0)
+		e = -1022;
+	else {
+		x += 1.0;
+		e -= 1023;
+	}
+	x = ldexp(x, e);
 
 	if (s)
 		x = -x;