From 064cb7e6e4622caac89f2446e7161c81a0bbcfd1 Mon Sep 17 00:00:00 2001 From: Jay Belanger Date: Fri, 20 Nov 2009 00:56:28 +0000 Subject: [PATCH] (math-compose-expr): Let `calc-twos-complement-mode' be nil. --- lisp/calc/calccomp.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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)) -- 2.39.5