Commit b593f1de authored by Jay Belanger's avatar Jay Belanger
Browse files

(math-fixnum-big): Use the variable math-bignum-digit-size.

parent e72e768b
...@@ -2222,7 +2222,7 @@ calc-kill calc-kill-region calc-yank)))) ...@@ -2222,7 +2222,7 @@ calc-kill calc-kill-region calc-yank))))
(defun math-fixnum-big (a) (defun math-fixnum-big (a)
(if (cdr 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))) (car a)))
(defvar math-simplify-only nil) (defvar math-simplify-only nil)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment