* All Files have been modified for inclusion of namespace cln;

[cln.git] / src / integer / elem / cl_I_minus1.cc

diff --git a/src/integer/elem/cl_I_minus1.cc b/src/integer/elem/cl_I_minus1.cc
index 38aa6606f80ac3f47441bbd4227a65103f73e514..d717e10f4bdbd72019c4705fa647272746827662 100644 (file)
--- a/src/integer/elem/cl_I_minus1.cc
+++ b/src/integer/elem/cl_I_minus1.cc
@@ -4,7 +4,7 @@
 #include "cl_sysdep.h"
 
 // Specification.
-#include "cl_integer.h"
+#include "cln/integer.h"
 
 
 // Implementation.
@@ -12,13 +12,15 @@
 #include "cl_I.h"
 #include "cl_DS.h"
 
+namespace cln {
+
 const cl_I minus1 (const cl_I& x)
 {
        if (fixnump(x))
          { // x ist Fixnum
            if (x.word != cl_combine(cl_FN_tag,bit(cl_value_len-1)))
                // bleibt Fixnum: direkt 1 subtrahieren
-               // This assumes cl_value_shift + cl_value_len == cl_word_size.
+               // This assumes cl_value_shift + cl_value_len == cl_pointer_size.
                { return cl_I_from_word(x.word - cl_combine(0,1)); }
           }
         // die sichere Methode
@@ -31,3 +33,5 @@ const cl_I minus1 (const cl_I& x)
           return DS_to_I(MSDptr,len); // wieder zum Integer machen
         }
 }
+
+}  // namespace cln