diff options
| author | Jay Belanger <jay.p.belanger@gmail.com> | 2009-11-20 00:56:28 +0000 |
|---|---|---|
| committer | Jay Belanger <jay.p.belanger@gmail.com> | 2009-11-20 00:56:28 +0000 |
| commit | 064cb7e6e4622caac89f2446e7161c81a0bbcfd1 (patch) | |
| tree | 1e6fbac61a86755ae00eeae884d4f0f060298ff5 /lisp/calc/calccomp.el | |
| parent | 50a982d673ca5cf448b16e119472ddd2441b6f0f (diff) | |
| download | emacs-064cb7e6e4622caac89f2446e7161c81a0bbcfd1.tar.gz | |
(math-compose-expr): Let `calc-twos-complement-mode' be nil.
Diffstat (limited to 'lisp/calc/calccomp.el')
| -rw-r--r-- | lisp/calc/calccomp.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/calc/calccomp.el b/lisp/calc/calccomp.el index 5ad798abb56..8c168244704 100644 --- a/lisp/calc/calccomp.el +++ b/lisp/calc/calccomp.el @@ -377,7 +377,8 @@ (list 'horiz "(" (math-compose-expr (nth 1 a) 0) ")") (math-compose-expr (nth 1 a) 201)) (let ((calc-language 'flat) - (calc-number-radix 10)) + (calc-number-radix 10) + (calc-twos-complement-mode nil)) (math-compose-expr (nth 2 a) 0)))) ((and (eq (car a) '/) (eq calc-language 'big)) |