src/float/sfloat/elem/cl_SF_compare.cc

   1 // compare().
   2
   3 // General includes.
   4 #include "cl_sysdep.h"
   5
   6 // Specification.
   7 #include "cln/sfloat.h"
   8
   9
  10 // Implementation.
  11
  12 #undef MAYBE_INLINE
  13 #define MAYBE_INLINE inline
  14 #include "cl_SF_minusp.cc"
  15
  16 namespace cln {
  17
  18 cl_signean compare (const cl_SF& x, const cl_SF& y)
  19 {
  20 // Methode:
  21 // x und y haben verschiedenes Vorzeichen ->
  22 //    x < 0 -> x < y
  23 //    x >= 0 -> x > y
  24 // x und y haben gleiches Vorzeichen ->
  25 //    x >=0 -> vergleiche x und y (die rechten 24 Bits)
  26 //    x <0 -> vergleiche y und x (die rechten 24 Bits)
  27       if (!minusp(y))
  28         // y>=0
  29         { if (!minusp(x))
  30             // y>=0, x>=0
  31             { if (x.word < y.word) return signean_minus; // x<y
  32               if (x.word > y.word) return signean_plus; // x>y
  33               return signean_null;
  34             }
  35             else
  36             // y>=0, x<0
  37             { return signean_minus; } // x<y
  38         }
  39         else
  40         { if (!minusp(x))
  41             // y<0, x>=0
  42             { return signean_plus; } // x>y
  43             else
  44             // y<0, x<0
  45             { if (x.word > y.word) return signean_minus; // |x|>|y| -> x<y
  46               if (x.word < y.word) return signean_plus; // |x|<|y| -> x>y
  47               return signean_null;
  48             }
  49         }
  50 }
  51
  52 }  // namespace cln