Fix buggy comparison: LHS of comparison was being treated as unsigned.

This commit is contained in:
Mark Dickinson 2010-01-13 22:15:53 +00:00
parent 6e0d3d67fb
commit 02139d74ba
1 changed files with 1 additions and 1 deletions

View File

@ -1141,7 +1141,7 @@ sulp(U *x, BCinfo *bc)
{ {
U u; U u;
if (bc->scale && 2*P + 1 - ((word0(x) & Exp_mask) >> Exp_shift) > 0) { if (bc->scale && 2*P + 1 > (int)((word0(x) & Exp_mask) >> Exp_shift)) {
/* rv/2^bc->scale is subnormal */ /* rv/2^bc->scale is subnormal */
word0(&u) = (P+2)*Exp_msk1; word0(&u) = (P+2)*Exp_msk1;
word1(&u) = 0; word1(&u) = 0;