src/float/ffloat/elem/cl_FF_minus.cc

   1 // binary operator -
   2
   3 // General includes.
   4 #include "cl_sysdep.h"
   5
   6 // Specification.
   7 #include "cln/ffloat.h"
   8
   9
  10 // Implementation.
  11
  12 #include "cl_FF.h"
  13 #include "cl_ieee.h"
  14
  15 namespace cln {
  16
  17 NEED_IEEE_FLOATS()
  18
  19 const cl_FF operator- (const cl_FF& x1, const cl_FF& x2)
  20 {
  21   #ifdef FAST_FLOAT
  22       float_to_FF(FF_to_float(x1) - FF_to_float(x2), return ,
  23                   TRUE, TRUE, // Overflow und subnormale Zahl abfangen
  24                   FALSE, // kein Underflow mit Ergebnis +/- 0.0 möglich
  25                          // (nach Definition der subnormalen Zahlen)
  26                   FALSE, FALSE // keine Singularität, kein NaN als Ergebnis möglich
  27                  );
  28   #else
  29       var ffloat x2_ = cl_ffloat_value(x2);
  30       if (FF_uexp(x2_) == 0)
  31         { return x1; }
  32         else
  33         { return x1 + allocate_ffloat(x2_ ^ bit(31)); }
  34   #endif
  35 }
  36
  37 }  // namespace cln