diff options
| -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 @@ | |||
| 377 | (list 'horiz "(" (math-compose-expr (nth 1 a) 0) ")") | 377 | (list 'horiz "(" (math-compose-expr (nth 1 a) 0) ")") |
| 378 | (math-compose-expr (nth 1 a) 201)) | 378 | (math-compose-expr (nth 1 a) 201)) |
| 379 | (let ((calc-language 'flat) | 379 | (let ((calc-language 'flat) |
| 380 | (calc-number-radix 10)) | 380 | (calc-number-radix 10) |
| 381 | (calc-twos-complement-mode nil)) | ||
| 381 | (math-compose-expr (nth 2 a) 0)))) | 382 | (math-compose-expr (nth 2 a) 0)))) |
| 382 | ((and (eq (car a) '/) | 383 | ((and (eq (car a) '/) |
| 383 | (eq calc-language 'big)) | 384 | (eq calc-language 'big)) |