some fixes: representation for 0, and corrected check for overflow

1989-08-01 16:34:01 +00:00
parent 2b2698c44c
commit 94a4bbb268
5 changed files with 18 additions and 7 deletions
--- a/modules/src/flt_arith/flt_nrm.c
+++ b/modules/src/flt_arith/flt_nrm.c
@@ -10,8 +10,11 @@
 flt_nrm(e)
 	register flt_arith *e;
 {
-	if ((e->m1 | e->m2) == 0L)
+	if ((e->m1 | e->m2) == 0L) {
+		e->flt_exp = 0;
+		e->flt_sign = 0;
 		return;
+	}

 	/* if top word is zero mov low word	*/
 	/* to top word, adjust exponent value	*/