[MIPS] ieee754[sd]p_neg workaround
It looks glibc's pow() assumes an unary '-' operation for any number (including NaNs) always inverts its sign bit (though IEEE754 does not specify the sign bit for NaNs). This patch make the kernel math-emu emulates real MIPS neg.[ds] instruction. Signed-off-by: Atsushi Nemoto <anemo@mba.ocn.ne.jp> Signed-off-by: Ralf Baechle <ralf@linux-mips.org>
This commit is contained in:
parent
d4264f1839
commit
c5033d7803
2 changed files with 20 additions and 8 deletions
|
@ -48,16 +48,22 @@ ieee754dp ieee754dp_neg(ieee754dp x)
|
||||||
CLEARCX;
|
CLEARCX;
|
||||||
FLUSHXDP;
|
FLUSHXDP;
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Invert the sign ALWAYS to prevent an endless recursion on
|
||||||
|
* pow() in libc.
|
||||||
|
*/
|
||||||
|
/* quick fix up */
|
||||||
|
DPSIGN(x) ^= 1;
|
||||||
|
|
||||||
if (xc == IEEE754_CLASS_SNAN) {
|
if (xc == IEEE754_CLASS_SNAN) {
|
||||||
|
ieee754dp y = ieee754dp_indef();
|
||||||
SETCX(IEEE754_INVALID_OPERATION);
|
SETCX(IEEE754_INVALID_OPERATION);
|
||||||
return ieee754dp_nanxcpt(ieee754dp_indef(), "neg");
|
DPSIGN(y) = DPSIGN(x);
|
||||||
|
return ieee754dp_nanxcpt(y, "neg");
|
||||||
}
|
}
|
||||||
|
|
||||||
if (ieee754dp_isnan(x)) /* but not infinity */
|
if (ieee754dp_isnan(x)) /* but not infinity */
|
||||||
return ieee754dp_nanxcpt(x, "neg", x);
|
return ieee754dp_nanxcpt(x, "neg", x);
|
||||||
|
|
||||||
/* quick fix up */
|
|
||||||
DPSIGN(x) ^= 1;
|
|
||||||
return x;
|
return x;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -48,16 +48,22 @@ ieee754sp ieee754sp_neg(ieee754sp x)
|
||||||
CLEARCX;
|
CLEARCX;
|
||||||
FLUSHXSP;
|
FLUSHXSP;
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Invert the sign ALWAYS to prevent an endless recursion on
|
||||||
|
* pow() in libc.
|
||||||
|
*/
|
||||||
|
/* quick fix up */
|
||||||
|
SPSIGN(x) ^= 1;
|
||||||
|
|
||||||
if (xc == IEEE754_CLASS_SNAN) {
|
if (xc == IEEE754_CLASS_SNAN) {
|
||||||
|
ieee754sp y = ieee754sp_indef();
|
||||||
SETCX(IEEE754_INVALID_OPERATION);
|
SETCX(IEEE754_INVALID_OPERATION);
|
||||||
return ieee754sp_nanxcpt(ieee754sp_indef(), "neg");
|
SPSIGN(y) = SPSIGN(x);
|
||||||
|
return ieee754sp_nanxcpt(y, "neg");
|
||||||
}
|
}
|
||||||
|
|
||||||
if (ieee754sp_isnan(x)) /* but not infinity */
|
if (ieee754sp_isnan(x)) /* but not infinity */
|
||||||
return ieee754sp_nanxcpt(x, "neg", x);
|
return ieee754sp_nanxcpt(x, "neg", x);
|
||||||
|
|
||||||
/* quick fix up */
|
|
||||||
SPSIGN(x) ^= 1;
|
|
||||||
return x;
|
return x;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue