X-Git-Url: https://ginac.de/CLN/cln.git//cln.git?a=blobdiff_plain;f=src%2Ffloat%2Fconv%2Fcl_FF_to_float.cc;h=a5192fd5901fad8774ea0168e49278695aad5e26;hb=HEAD;hp=d7204bc4b19426aaaac2075a750705c557f8ab22;hpb=dd9e0f894eec7e2a8cf85078330ddc0a6639090b;p=cln.git diff --git a/src/float/conv/cl_FF_to_float.cc b/src/float/conv/cl_FF_to_float.cc index d7204bc..a5192fd 100644 --- a/src/float/conv/cl_FF_to_float.cc +++ b/src/float/conv/cl_FF_to_float.cc @@ -1,22 +1,24 @@ // cl_FF_to_float(). // General includes. -#include "cl_sysdep.h" +#include "base/cl_sysdep.h" // Specification. -#include "cl_ffloat.h" +#include "cln/ffloat.h" // Implementation. -#include "cl_FF.h" +#include "float/ffloat/cl_FF.h" -float cl_float_approx (const cl_FF& obj) +namespace cln { + +float float_approx (const cl_FF& obj) { union { ffloat eksplicit; float machine_float; } u; #define val u.eksplicit val = cl_ffloat_value(obj); - // Der Exponent muß um FF_exp_mid-126 erniedrigt werden. + // Der Exponent muß um FF_exp_mid-126 erniedrigt werden. if (FF_exp_mid>126) { var uintL exp = (val >> FF_mant_len) & (bit(FF_exp_len)-1); // e if (exp < FF_exp_mid-126+1) @@ -33,3 +35,5 @@ float cl_float_approx (const cl_FF& obj) #undef val return u.machine_float; } + +} // namespace cln