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

2009-11-20 01:00:27 +00:00
parent 7b999abb57
commit e6e9cfbdc4
1 changed files with 1 additions and 0 deletions
--- 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)