sp_cmp.c 1.5 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859
  1. /* IEEE754 floating point arithmetic
  2. * single precision
  3. */
  4. /*
  5. * MIPS floating point support
  6. * Copyright (C) 1994-2000 Algorithmics Ltd.
  7. *
  8. * This program is free software; you can distribute it and/or modify it
  9. * under the terms of the GNU General Public License (Version 2) as
  10. * published by the Free Software Foundation.
  11. *
  12. * This program is distributed in the hope it will be useful, but WITHOUT
  13. * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  14. * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
  15. * for more details.
  16. *
  17. * You should have received a copy of the GNU General Public License along
  18. * with this program; if not, write to the Free Software Foundation, Inc.,
  19. * 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  20. */
  21. #include "ieee754sp.h"
  22. int ieee754sp_cmp(union ieee754sp x, union ieee754sp y, int cmp, int sig)
  23. {
  24. int vx;
  25. int vy;
  26. COMPXSP;
  27. COMPYSP;
  28. EXPLODEXSP;
  29. EXPLODEYSP;
  30. FLUSHXSP;
  31. FLUSHYSP;
  32. ieee754_clearcx(); /* Even clear inexact flag here */
  33. if (ieee754_class_nan(xc) || ieee754_class_nan(yc)) {
  34. if (sig ||
  35. xc == IEEE754_CLASS_SNAN || yc == IEEE754_CLASS_SNAN)
  36. ieee754_setcx(IEEE754_INVALID_OPERATION);
  37. return (cmp & IEEE754_CUN) != 0;
  38. } else {
  39. vx = x.bits;
  40. vy = y.bits;
  41. if (vx < 0)
  42. vx = -vx ^ SP_SIGN_BIT;
  43. if (vy < 0)
  44. vy = -vy ^ SP_SIGN_BIT;
  45. if (vx < vy)
  46. return (cmp & IEEE754_CLT) != 0;
  47. else if (vx == vy)
  48. return (cmp & IEEE754_CEQ) != 0;
  49. else
  50. return (cmp & IEEE754_CGT) != 0;
  51. }
  52. }