src/float/transcendental/cl_F_ln2_var.cc

   1 // cl_F_ln2.
   2
   3 // General includes.
   4 #include "cl_sysdep.h"
   5
   6 // Specification.
   7 #include "cl_F_tran.h"
   8
   9
  10 // Implementation.
  11
  12 #include "cl_DS.h"
  13 #include "cl_LF.h"
  14 #include "cl_LF_impl.h"
  15 #include "cl_F.h"
  16
  17 namespace cln {
  18
  19
  20 cl_LF& cl_LF_ln2()
  21 {
  22         // Mantisse von ln(2) :
  23         static const uintD ln2_mantisse [64/intDsize] =
  24                 #include "cl_F_ln2_var.h"
  25         static cl_LF val = encode_LF_array(0,0,ln2_mantisse,64/intDsize);
  26         return val;
  27 }
  28
  29 // Problem: If someone changes free_hook, the destructor of this
  30 // will call the new hook, passing it some pointer obtained by the old
  31 // malloc_hook. ??
  32
  33 const cl_SF& cl_SF_ln2()
  34 {
  35         static const cl_SF val = cl_LF_to_SF(cl_LF_ln2());
  36         return val;
  37 }
  38
  39 const cl_FF& cl_FF_ln2()
  40 {
  41         static const cl_FF val = cl_LF_to_FF(cl_LF_ln2());
  42         return val;
  43 }
  44
  45 const cl_DF& cl_DF_ln2()
  46 {
  47         static const cl_DF val = cl_LF_to_DF(cl_LF_ln2());
  48         return val;
  49 }
  50
  51 }  // namespace cln
  52