summaryrefslogtreecommitdiff
path: root/lisp/calc/calc-bin.el
diff options
context:
space:
mode:
authorJay Belanger <jay.p.belanger@gmail.com>2007-07-08 00:26:02 +0000
committerJay Belanger <jay.p.belanger@gmail.com>2007-07-08 00:26:02 +0000
commit9f2dcb8bcffdda00fadacf9b4166c1ec47c95d0e (patch)
treebf0a0f3df7c3159b5dfd4d02e27a45ed9e2030ea /lisp/calc/calc-bin.el
parent4346200eb93682e0dda0149e71ea3ff462c0f397 (diff)
downloademacs-9f2dcb8bcffdda00fadacf9b4166c1ec47c95d0e.tar.gz
(math-bignum-logb-digit-size,math-bignum-digit-power-of-two):
Evaluate when compiled.
Diffstat (limited to 'lisp/calc/calc-bin.el')
-rw-r--r--lisp/calc/calc-bin.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calc/calc-bin.el b/lisp/calc/calc-bin.el
index fa8ba118c8c..2dde6216a06 100644
--- a/lisp/calc/calc-bin.el
+++ b/lisp/calc/calc-bin.el
@@ -40,7 +40,7 @@ This is the largest value of B such that 2^B is less than
the size of a Calc bignum digit.")
(defconst math-bignum-digit-power-of-two
- (eval-when-compile (expt 2 math-bignum-logb-digit-size))
+ (eval-when-compile (expt 2 (logb math-bignum-digit-size)))
"The largest power of 2 less than the size of a Calc bignum digit.")
;;; b-prefix binary commands.