Mercurial > emacs
changeset 81576:c17a6c377cf2
(math-fixnum-big): Use the variable math-bignum-digit-size.
| author | Jay Belanger <jay.p.belanger@gmail.com> |
|---|---|
| date | Sat, 23 Jun 2007 04:36:29 +0000 |
| parents | cea1e05b3c83 |
| children | 419b76a6cca5 |
| files | lisp/calc/calc-ext.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calc/calc-ext.el Sat Jun 23 04:30:24 2007 +0000 +++ b/lisp/calc/calc-ext.el Sat Jun 23 04:36:29 2007 +0000 @@ -2222,7 +2222,7 @@ (defun math-fixnum-big (a) (if (cdr a) - (+ (car a) (* (math-fixnum-big (cdr a)) 1000)) + (+ (car a) (* (math-fixnum-big (cdr a)) math-bignum-digit-size)) (car a))) (defvar math-simplify-only nil)