[Emacs-diffs] emacs/lisp/calc calccomp.el

[Jay Belanger]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Jay Belanger <jpb>      09/11/20 00:56:29

Modified files:
        lisp/calc      : calccomp.el 

Log message:
        (math-compose-expr): Let `calc-twos-complement-mode' be nil.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/calc/calccomp.el?cvsroot=emacs&r1=1.30&r2=1.31

Patches:
Index: calccomp.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/calc/calccomp.el,v
retrieving revision 1.30
retrieving revision 1.31
diff -u -b -r1.30 -r1.31
--- calccomp.el 5 Jan 2009 03:20:30 -0000       1.30
+++ calccomp.el 20 Nov 2009 00:56:28 -0000      1.31
@@ -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))