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

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

diff --git a/src/integer/elem/cl_I_uminus.cc b/src/integer/elem/cl_I_uminus.cc
index cb394797c9a9fb654e6c5787ca9b1664ca6e0cf9..f8732f075a129266005983c9c9480e4f41a5eac2 100644 (file)
--- a/src/integer/elem/cl_I_uminus.cc
+++ b/src/integer/elem/cl_I_uminus.cc
@@ -1,7 +1,7 @@
 // unary operator -
 
 // General includes.
-#include "cl_sysdep.h"
+#include "base/cl_sysdep.h"
 
 // Specification.
 #include "cln/integer.h"
@@ -9,21 +9,21 @@
 
 // Implementation.
 
-#include "cl_I.h"
-#include "cl_DS.h"
+#include "integer/cl_I.h"
+#include "base/digitseq/cl_DS.h"
 
 namespace cln {
 
 const cl_I operator- (const cl_I& x)
 {
        if (fixnump(x)) {
-               #if (cl_value_len < intLsize)
-               return L_to_I(- FN_to_L(x));
+               #if (cl_value_len < intVsize)
+               return V_to_I(- FN_to_V(x));
                #elif (cl_word_size==64)
                return Q_to_I(- FN_to_Q(x));
-               #else // (cl_value_len == intLsize)
-               var sint32 xhi = sign_of(FN_to_L(x));
-               var uint32 xlo = FN_to_L(x);
+               #elif (intVsize==32) // && (cl_value_len == intVsize)
+               var sint32 xhi = sign_of(FN_to_V(x));
+               var uint32 xlo = FN_to_V(x);
                return L2_to_I(-xhi-(xlo!=0),-xlo);
                #endif
        } else {