X-Git-Url: https://ginac.de/CLN/cln.git//cln.git?a=blobdiff_plain;f=src%2Finteger%2Fbitwise%2Fcl_I_logorc2.cc;h=993a4e1fa67310a91ccbbfaa680311f3b5362650;hb=HEAD;hp=066506b92a41fd18b51fbbb540fe6c1a72dabdac;hpb=850abfde7f0d985ba01526c346bcd0d733562943;p=cln.git

diff --git a/src/integer/bitwise/cl_I_logorc2.cc b/src/integer/bitwise/cl_I_logorc2.cc
index 066506b..993a4e1 100644
--- a/src/integer/bitwise/cl_I_logorc2.cc
+++ b/src/integer/bitwise/cl_I_logorc2.cc
@@ -1,7 +1,7 @@
 // logorc2().
 
 // General includes.
-#include "cl_sysdep.h"
+#include "base/cl_sysdep.h"
 
 // Specification.
 #include "cln/integer.h"
@@ -9,22 +9,22 @@
 
 // Implementation.
 
-#include "cl_I.h"
-#include "cl_DS.h"
-#include "cl_I_log.h"
+#include "integer/cl_I.h"
+#include "base/digitseq/cl_DS.h"
+#include "integer/bitwise/cl_I_log.h"
 
 namespace cln {
 
 // Logische Operationen auf Integers:
-// Methode: aus den Längen der beiden Argumente eine obere Schranke für
-// die Länge des Ergebnisses berechnen (das Maximum der beiden Längen und
-// FN_maxlength), so daß das MSD für unendlich viele Bits steht.
-// Dann beide Argumente in gleichgroße Digit sequences umwandeln, Operation
-// mit einer einfachen Schleife durchführen.
+// Methode: aus den Längen der beiden Argumente eine obere Schranke für
+// die Länge des Ergebnisses berechnen (das Maximum der beiden Längen und
+// FN_maxlength), so daß das MSD für unendlich viele Bits steht.
+// Dann beide Argumente in gleichgroße Digit sequences umwandeln, Operation
+// mit einer einfachen Schleife durchführen.
 
 const cl_I logorc2 (const cl_I& x, const cl_I& y)
     { if (fixnump(x) && fixnump(y)) // Beides Fixnums -> ganz einfach:
-        { // bitweise als Fixnum zurück
+        { // bitweise als Fixnum zurück
           return cl_I_from_word((x.word | ~ y.word) & cl_combine(cl_FN_tag,~(cl_uint)0));
         }
         else
@@ -37,7 +37,7 @@ const cl_I logorc2 (const cl_I& x, const cl_I& y)
          {var uintD* xptr; I_to_DS_n(x,n,xptr=); // Pointer in DS zu x
           var uintD* yptr; I_to_DS_n(y,n,yptr=); // Pointer in DS zu y
           var uintD* zptr = xptr; // Pointer aufs Ergebnis
-          orc2_loop_msp(xptr,yptr,n); // mit OR NOT verknüpfen
+          orc2_loop_msp(xptr,yptr,n); // mit OR NOT verknüpfen
           return DS_to_I(zptr,n); // Ergebnis als Integer
     }   }}