Use paths relative the `src' directory in the #include directives.

[cln.git] / src / float / lfloat / misc / cl_LF_idecode.cc

diff --git a/src/float/lfloat/misc/cl_LF_idecode.cc b/src/float/lfloat/misc/cl_LF_idecode.cc
index 959aa3dba3b0215484e113c3f1089f568d3ff36e..3eeb5e651dd995d95a41935362f2426f9b2fca61 100644 (file)
--- a/src/float/lfloat/misc/cl_LF_idecode.cc
+++ b/src/float/lfloat/misc/cl_LF_idecode.cc
@@ -1,29 +1,30 @@
 // integer_decode_float().
 
 // General includes.
-#include "cl_sysdep.h"
+#include "base/cl_sysdep.h"
 
 // Specification.
-#include "cl_lfloat.h"
+#include "cln/lfloat.h"
 
 
 // Implementation.
 
-#include "cl_LF.h"
-#include "cl_I.h"
-#include "cl_DS.h"
+#include "float/lfloat/cl_LF.h"
+#include "integer/cl_I.h"
+#include "base/digitseq/cl_DS.h"
 
-MAYBE_INLINE
-const cl_idecoded_float integer_decode_float (const cl_LF& x)
+namespace cln {
+
+CL_INLINE const cl_idecoded_float CL_INLINE_DECL(integer_decode_float) (const cl_LF& x)
 {
        // x entpacken:
-       var uintL uexp = TheLfloat(x)->expo;
+       var uintE uexp = TheLfloat(x)->expo;
        if (uexp == 0)
                { return cl_idecoded_float(0, 0, 1); }
        var cl_signean sign = TheLfloat(x)->sign;
        var uintC len = TheLfloat(x)->len;
        // intDsize*len >= 53 >= 33 >= cl_value_len, also len >= bn_minlength.
-       // Baue Integer für die Mantisse.
+       // Baue Integer für die Mantisse.
        // Vorne 1 Nulldigit, damit es eine NDS wird.
        var Bignum mant = allocate_bignum(1+len);
        mspref(arrayMSDptr(TheBignum(mant)->data,1+len),0) = 0;
@@ -32,7 +33,9 @@ const cl_idecoded_float integer_decode_float (const cl_LF& x)
                // Mantisse
                mant,
                // e-intDsize*n = uexp-LF_exp_mid-intDsize*n als Integer
-               minus(uexp, LF_exp_mid + intDsize*(uintL)len),
+               minus(uexp, LF_exp_mid + intDsize*len),
                (sign>=0 ? cl_I(1) : cl_I(-1)) // (-1)^s erzeugen
               );
 }
+
+}  // namespace cln