Commit FPU bugfixes from Scott Duplichan

This commit is contained in:
Stanislav Shwartsman 2003-04-19 15:48:30 +00:00
parent 40bd4f138b
commit 90f4e87d32
2 changed files with 4 additions and 4 deletions

View File

@ -1,6 +1,6 @@
/*---------------------------------------------------------------------------+
| reg_ld_str.c |
| $Id: reg_ld_str.c,v 1.8 2003-04-12 21:02:07 sshwarts Exp $
| $Id: reg_ld_str.c,v 1.9 2003-04-19 15:48:30 sshwarts Exp $
| |
| All of the functions which transfer data between user memory and FPU_REGs.|
| |
@ -1171,7 +1171,7 @@ FPU_round_to_int(FPU_REG *r, u_char tag)
very_big = !(~(r->sigh) | ~(r->sigl)); /* test for 0xfff...fff */
#define half_or_more (eax & 0x80000000)
#define frac_part (eax)
#define more_than_half ((eax & 0x80000001) == 0x80000001)
#define more_than_half (eax > 0x80000000)
switch (control_word & CW_RC)
{
case RC_RND:

View File

@ -1,6 +1,6 @@
/*---------------------------------------------------------------------------+
| reg_norm.c |
| $Id: reg_norm.c,v 1.2 2001-10-06 03:53:46 bdenney Exp $
| $Id: reg_norm.c,v 1.3 2003-04-19 15:48:30 sshwarts Exp $
| |
| Copyright (C) 1992,1993,1994,1995,1997,1999 |
| W. Metzenthen, 22 Parker St, Ormond, Vic 3163, |
@ -26,7 +26,7 @@ int FPU_normalize_nuo(FPU_REG *x, int bias)
{
if ( x->sigl == 0 )
{
x->exp = EXP_UNDER;
x->exp = 0;
return TAG_Zero;
}
x->sigh = x->sigl;