(e24toe, e53toe, e64toe): Fix sign in conversions of -infinity.
(e24toe, e53toe, e64toe): Fix sign in conversions of -infinity. Always do eclear before einfin. From-SVN: r4513
This commit is contained in:
parent
ffed099353
commit
dca821e1a9
11
gcc/real.c
11
gcc/real.c
|
@ -1328,7 +1328,9 @@ eisnan (x)
|
|||
}
|
||||
|
||||
/* Fill external format number with infinity pattern (IEEE)
|
||||
or largest possible number (non-IEEE). */
|
||||
or largest possible number (non-IEEE).
|
||||
Before calling einfin, you should either call eclear
|
||||
or set up the sign bit by hand. */
|
||||
|
||||
void
|
||||
einfin (x)
|
||||
|
@ -2635,8 +2637,9 @@ e53toe (pe, y)
|
|||
}
|
||||
#endif
|
||||
#endif /* NANS */
|
||||
eclear (y);
|
||||
einfin (y);
|
||||
if (r & 0x8000)
|
||||
if (yy[0])
|
||||
eneg (y);
|
||||
return;
|
||||
}
|
||||
|
@ -2728,6 +2731,7 @@ e64toe (pe, y)
|
|||
}
|
||||
#endif
|
||||
#endif /* NANS */
|
||||
eclear (y);
|
||||
einfin (y);
|
||||
if (*p & 0x8000)
|
||||
eneg (y);
|
||||
|
@ -2787,8 +2791,9 @@ e24toe (pe, y)
|
|||
}
|
||||
#endif
|
||||
#endif /* NANS */
|
||||
eclear (y);
|
||||
einfin (y);
|
||||
if (r & 0x8000)
|
||||
if (yy[0])
|
||||
eneg (y);
|
||||
return;
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue