X-Git-Url: https://ginac.de/CLN/cln.git//cln.git?a=blobdiff_plain;f=src%2Finteger%2Fbitwise%2Fcl_I_logand.cc;h=bcdb2be5736dc421f614f855d8301d8a70ee3c43;hb=8169a19b38c42588b39b21dae5bdb964e2f6b8c6;hp=7ca2b17491f33a0185d7418383b0926015ca8803;hpb=850abfde7f0d985ba01526c346bcd0d733562943;p=cln.git diff --git a/src/integer/bitwise/cl_I_logand.cc b/src/integer/bitwise/cl_I_logand.cc index 7ca2b17..bcdb2be 100644 --- a/src/integer/bitwise/cl_I_logand.cc +++ b/src/integer/bitwise/cl_I_logand.cc @@ -1,7 +1,7 @@ // logand(). // 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 logand (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); } if (fixnump(x)) @@ -48,7 +48,7 @@ const cl_I logand (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 - and_loop_msp(xptr,yptr,n); // mit AND verknüpfen + and_loop_msp(xptr,yptr,n); // mit AND verknüpfen return DS_to_I(zptr,n); // Ergebnis als Integer } }}