(calcFunc-vunpack): Let `calc-twos-complement-mode' be nil.

[gnu-emacs] / lisp / calc / calc-vec.el

diff --git a/lisp/calc/calc-vec.el b/lisp/calc/calc-vec.el
index 3d0dd2ab3bd2663dd4cea3f1a6ca04d607004d71..170070e41a0786bf9e4c0903f864e96c5730381f 100644 (file)
--- a/lisp/calc/calc-vec.el
+++ b/lisp/calc/calc-vec.el
@@ -1338,6 +1338,7 @@
   (if w (setq a (math-clip a w)))
   (if (math-messy-integerp a) (setq a (math-trunc a)))
   (let* ((calc-number-radix 2)
+         (calc-twos-complement-mode nil)
         (neg (math-negp a))
         (aa (if neg (math-sub -1 a) a))
         (str (if (eq aa 0)