1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

(math-bignum-logb-digit-size,math-bignum-digit-power-of-two): Evaluate

when compiled.
This commit is contained in:
Jay Belanger 2007-07-08 00:18:06 +00:00
parent 9066adc420
commit 4346200eb9
2 changed files with 5 additions and 2 deletions

View file

@ -34,13 +34,13 @@
;;; Some useful numbers
(defconst math-bignum-logb-digit-size
(logb math-bignum-digit-size)
(eval-when-compile (logb math-bignum-digit-size))
"The logb of the size of a bignum digit.
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
(expt 2 math-bignum-logb-digit-size)
(eval-when-compile (expt 2 math-bignum-logb-digit-size))
"The largest power of 2 less than the size of a Calc bignum digit.")
;;; b-prefix binary commands.