2019-05-31 08:09:55 +00:00
|
|
|
// SPDX-License-Identifier: GPL-2.0-only
|
2005-04-16 22:20:36 +00:00
|
|
|
/* IEEE754 floating point arithmetic
|
|
|
|
* double precision: common utilities
|
|
|
|
*/
|
|
|
|
/*
|
|
|
|
* MIPS floating point support
|
|
|
|
* Copyright (C) 1994-2000 Algorithmics Ltd.
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include "ieee754dp.h"
|
|
|
|
|
2014-04-15 23:31:11 +00:00
|
|
|
int ieee754dp_cmp(union ieee754dp x, union ieee754dp y, int cmp, int sig)
|
2005-04-16 22:20:36 +00:00
|
|
|
{
|
2014-04-25 23:49:14 +00:00
|
|
|
s64 vx;
|
|
|
|
s64 vy;
|
|
|
|
|
2005-04-16 22:20:36 +00:00
|
|
|
COMPXDP;
|
|
|
|
COMPYDP;
|
|
|
|
|
|
|
|
EXPLODEXDP;
|
|
|
|
EXPLODEYDP;
|
|
|
|
FLUSHXDP;
|
|
|
|
FLUSHYDP;
|
2014-04-18 22:36:32 +00:00
|
|
|
ieee754_clearcx(); /* Even clear inexact flag here */
|
2005-04-16 22:20:36 +00:00
|
|
|
|
2015-04-03 22:25:38 +00:00
|
|
|
if (ieee754_class_nan(xc) || ieee754_class_nan(yc)) {
|
2015-04-03 22:24:35 +00:00
|
|
|
if (sig ||
|
|
|
|
xc == IEEE754_CLASS_SNAN || yc == IEEE754_CLASS_SNAN)
|
2014-04-18 22:36:32 +00:00
|
|
|
ieee754_setcx(IEEE754_INVALID_OPERATION);
|
2015-04-03 22:25:43 +00:00
|
|
|
return (cmp & IEEE754_CUN) != 0;
|
2005-04-16 22:20:36 +00:00
|
|
|
} else {
|
2014-04-25 23:49:14 +00:00
|
|
|
vx = x.bits;
|
|
|
|
vy = y.bits;
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
if (vx < 0)
|
|
|
|
vx = -vx ^ DP_SIGN_BIT;
|
|
|
|
if (vy < 0)
|
|
|
|
vy = -vy ^ DP_SIGN_BIT;
|
|
|
|
|
|
|
|
if (vx < vy)
|
|
|
|
return (cmp & IEEE754_CLT) != 0;
|
|
|
|
else if (vx == vy)
|
|
|
|
return (cmp & IEEE754_CEQ) != 0;
|
|
|
|
else
|
|
|
|
return (cmp & IEEE754_CGT) != 0;
|
|
|
|
}
|
|
|
|
}
|