1 /* IEEE754 floating point arithmetic
2 * double precision: common utilities
3 */
4 /*
5 * MIPS floating point support
6 * Copyright (C) 1994-2000 Algorithmics Ltd.
7 *
8 * ########################################################################
9 *
10 * This program is free software; you can distribute it and/or modify it
11 * under the terms of the GNU General Public License (Version 2) as
12 * published by the Free Software Foundation.
13 *
14 * This program is distributed in the hope it will be useful, but WITHOUT
15 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
16 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
17 * for more details.
18 *
19 * You should have received a copy of the GNU General Public License along
20 * with this program; if not, write to the Free Software Foundation, Inc.,
21 * 59 Temple Place - Suite 330, Boston MA 02111-1307, USA.
22 *
23 * ########################################################################
24 */
25
26
27 #include "ieee754dp.h"
28
ieee754dp_cmp(ieee754dp x,ieee754dp y,int cmp,int sig)29 int ieee754dp_cmp(ieee754dp x, ieee754dp y, int cmp, int sig)
30 {
31 COMPXDP;
32 COMPYDP;
33
34 EXPLODEXDP;
35 EXPLODEYDP;
36 FLUSHXDP;
37 FLUSHYDP;
38 CLEARCX; /* Even clear inexact flag here */
39
40 if (ieee754dp_isnan(x) || ieee754dp_isnan(y)) {
41 if (sig || xc == IEEE754_CLASS_SNAN || yc == IEEE754_CLASS_SNAN)
42 SETCX(IEEE754_INVALID_OPERATION);
43 if (cmp & IEEE754_CUN)
44 return 1;
45 if (cmp & (IEEE754_CLT | IEEE754_CGT)) {
46 if (sig && SETANDTESTCX(IEEE754_INVALID_OPERATION))
47 return ieee754si_xcpt(0, "fcmpf", x);
48 }
49 return 0;
50 } else {
51 s64 vx = x.bits;
52 s64 vy = y.bits;
53
54 if (vx < 0)
55 vx = -vx ^ DP_SIGN_BIT;
56 if (vy < 0)
57 vy = -vy ^ DP_SIGN_BIT;
58
59 if (vx < vy)
60 return (cmp & IEEE754_CLT) != 0;
61 else if (vx == vy)
62 return (cmp & IEEE754_CEQ) != 0;
63 else
64 return (cmp & IEEE754_CGT) != 0;
65 }
66 }
67