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