0.6.8.9:
[sbcl.git] / src / code / bignum.lisp
index 5fd2fe0..2f60b02 100644 (file)
 \f
 ;;;; What's a bignum?
 
-(eval-when (:compile-toplevel :load-toplevel :execute) ; necessary for DEFTYPE
-
 (defconstant digit-size 32)
 
 (defconstant maximum-bignum-length (1- (ash 1 (- 32 sb!vm:type-bits))))
-
-) ; EVAL-WHEN
 \f
 ;;;; internal inline routines