Fixes to bignum bit operations affecting pretty much all bit operations

when bit field operands are negative, affecting logand, logor, logxor,
lognot, logtrunc, logtest and ash. In addition, logtest was found to
return the logical inverse of its correct value.

* arith.c (logtest): Fix broken boolean polarity
of return value.

* mpi-patches/add-bitops (mp_2comp): Fix incorrect
treatment of negative values.
(mp_and): Fix incorrectly ordered statements, which
cause failure when operands are negative.

1 files changed, 1 insertions, 1 deletions

diff --git a/arith.c b/arith.c
index b90f79bc..c52cdb6c 100644
--- a/arith.c
+++ b/arith.c
@@ -1655,7 +1655,7 @@ bad:
 val logtest(val a, val b)
 {
   /* TODO: optimize */
-  return logand(a, b) == zero ? t : nil;
+  return logand(a, b) == zero ? nil : t;
 }
 
 static val comp_trunc(val a, val bits)