X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcode%2Fbignum.lisp;h=2f60b0201131d9d18752cb5127934862ab8ba1b7;hb=4cacd5df6c36c1815db4f09767017f5b85757ed1;hp=5fd2fe00f52b8bbbeb76876792317ea81ffa1bf5;hpb=cea4896b2482b7b2b429c1631d774b4cfbc0efba;p=sbcl.git

diff --git a/src/code/bignum.lisp b/src/code/bignum.lisp
index 5fd2fe0..2f60b02 100644
--- a/src/code/bignum.lisp
+++ b/src/code/bignum.lisp
@@ -108,13 +108,9 @@
 
 ;;;; 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
 
 ;;;; internal inline routines