From 9f2dcb8bcffdda00fadacf9b4166c1ec47c95d0e Mon Sep 17 00:00:00 2001 From: Jay Belanger Date: Sun, 8 Jul 2007 00:26:02 +0000 Subject: [PATCH] (math-bignum-logb-digit-size,math-bignum-digit-power-of-two): Evaluate when compiled. --- lisp/calc/calc-bin.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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. -- 2.39.5