diff options
| author | Jay Belanger | 2007-08-17 20:18:16 +0000 |
|---|---|---|
| committer | Jay Belanger | 2007-08-17 20:18:16 +0000 |
| commit | 37cecd78a0c473d992fa66b763d41034fc4719bb (patch) | |
| tree | 331a36d0986b6064107af73fa3c713165085c7bc | |
| parent | 7026903cf303168725fa3091d5eeaa5f0134dc43 (diff) | |
| download | emacs-37cecd78a0c473d992fa66b763d41034fc4719bb.tar.gz emacs-37cecd78a0c473d992fa66b763d41034fc4719bb.zip | |
(math-bignum-digit-length): Compute the appropriate value.
| -rw-r--r-- | lisp/calc/calc.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el index 5377d4da75e..8e416293a45 100644 --- a/lisp/calc/calc.el +++ b/lisp/calc/calc.el | |||
| @@ -2284,8 +2284,8 @@ See calc-keypad for details." | |||
| 2284 | 2284 | ||
| 2285 | 2285 | ||
| 2286 | 2286 | ||
| 2287 | (defconst math-bignum-digit-length 4 | 2287 | (defconst math-bignum-digit-length |
| 2288 | ; (truncate (/ (log10 (/ most-positive-fixnum 2)) 2)) | 2288 | (truncate (/ (log10 (/ most-positive-fixnum 2)) 2)) |
| 2289 | "The length of a \"digit\" in Calc bignums. | 2289 | "The length of a \"digit\" in Calc bignums. |
| 2290 | If a big integer is of the form (bigpos N0 N1 ...), this is the | 2290 | If a big integer is of the form (bigpos N0 N1 ...), this is the |
| 2291 | length of the allowable Emacs integers N0, N1,... | 2291 | length of the allowable Emacs integers N0, N1,... |