X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Flisp-stream.lisp;h=5a34f9fb9fe676b161b02cc35405e651ebe800b0;hb=95a6db7329b91dd90d165dd4057b9b5098d34aa2;hp=f78bf06ef8944f89c107a885621ff0c246a04333;hpb=985c2d805428e1bbc479524fc955da5028d3e66e;p=sbcl.git

diff --git a/src/code/lisp-stream.lisp b/src/code/lisp-stream.lisp
index f78bf06..5a34f9f 100644
--- a/src/code/lisp-stream.lisp
+++ b/src/code/lisp-stream.lisp
@@ -11,8 +11,7 @@
 
 (in-package "SB!IMPL")
 
-(eval-when (:compile-toplevel :load-toplevel :execute)
-  (defconstant in-buffer-length 512 "the size of a stream in-buffer"))
+(defconstant in-buffer-length 512 "the size of a stream in-buffer")
 
 (deftype in-buffer-type ()
   `(simple-array (unsigned-byte 8) (,in-buffer-length)))