]> www.ginac.de Git - cln.git/blobdiff - src/float/ffloat/misc/cl_FF_decode.cc
Finalize CLN 1.3.7 release.
[cln.git] / src / float / ffloat / misc / cl_FF_decode.cc
index 31c1ccf79d8b374d523a0e4be81cc03631c5be4c..77f0cdee33162ff6fde717ae0b5c54f85cabfcd6 100644 (file)
@@ -1,29 +1,33 @@
 // decode_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 "cl_I.h"
+#include "float/ffloat/cl_FF.h"
+#include "integer/cl_I.h"
 
-const cl_decoded_ffloat decode_float (const cl_FF& x)
+namespace cln {
+
+const decoded_ffloat decode_float (const cl_FF& x)
 {
        // x entpacken:
        var cl_signean sign;
        var sintL exp;
        var uint32 mant;
-       FF_decode(x, { return cl_decoded_ffloat(cl_FF_0, 0, cl_FF_1); },
+       FF_decode(x, { return decoded_ffloat(cl_FF_0, 0, cl_FF_1); },
                     sign=,exp=,mant=
                 );
-       return cl_decoded_ffloat(
+       return decoded_ffloat(
                encode_FF(0,0,mant), // (-1)^0 * 2^0 * m erzeugen
                L_to_FN(exp), // e als Fixnum
                encode_FF(sign,1,bit(FF_mant_len)) // (-1)^s erzeugen
               );
 }
+
+}  // namespace cln