src/float/conv/cl_F_to_SF.cc

   1 // cl_F_to_SF().
   2
   3 // General includes.
   4 #include "cl_sysdep.h"
   5
   6 // Specification.
   7 #include "cl_float.h"
   8
   9
  10 // Implementation.
  11
  12 #include "cl_F.h"
  13
  14 const cl_SF cl_F_to_SF (const cl_F& x)
  15 {
  16         floatcase(x
  17         ,       return x;
  18         ,       return cl_FF_to_SF(x);
  19         ,       return cl_DF_to_SF(x);
  20         ,       return cl_LF_to_SF(x);
  21         );
  22 }