From b07825aee34f05e254cc5409a37bf4e353fa56ef Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Thu, 13 Jul 1989 11:18:02 +0000
Subject: [PATCH] exponent was wrong in divide routine; corrected

---
 modules/src/flt_arith/flt_div.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/modules/src/flt_arith/flt_div.c b/modules/src/flt_arith/flt_div.c
index 2db3f3a7e..82fe7b120 100644
--- a/modules/src/flt_arith/flt_div.c
+++ b/modules/src/flt_arith/flt_div.c
@@ -31,7 +31,7 @@ flt_div(e1,e2,e3)
 		e3->flt_sign = 0;
 		return;
 	}
-	e3->flt_exp = e1->flt_exp - e2->flt_exp + 2;
+	e3->flt_exp = e1->flt_exp - e2->flt_exp;
 
 	u[4] = (e1->m2 & 1) << 15;
 	flt_b64_rsft(&(e1->flt_mantissa));
-- 
2.34.1