corrected the overflow checks

This commit is contained in:
ceriel 1988-04-28 14:21:55 +00:00
parent 2a11727622
commit c4d0a4f449

View file

@ -104,7 +104,7 @@ dbl_over: trap(EFOVFL);
} }
} }
/* check for overflow */ /* check for overflow */
if (f->exp >= DBL_MAX) if (f->exp > DBL_MAX)
goto dbl_over; goto dbl_over;
/* STORE EXPONENT: */ /* STORE EXPONENT: */
@ -177,7 +177,7 @@ sgl_over: trap(EFOVFL);
} }
} }
} }
if (f->exp >= SGL_MAX) if (f->exp > SGL_MAX)
goto sgl_over; goto sgl_over;
/* STORE EXPONENT */ /* STORE EXPONENT */