X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fearly-cl.lisp;h=8bee41ccdd4b48e40fa0b218824a05cd3725d181;hb=d01d509257052e694365b76be5ab597fa06764ec;hp=f8a1aa2f9d8c54497876b7e3f3f1e3e42b3d159d;hpb=99ad0a384664dc98af26245a33f11619ec0854ad;p=sbcl.git

diff --git a/src/code/early-cl.lisp b/src/code/early-cl.lisp
index f8a1aa2..8bee41c 100644
--- a/src/code/early-cl.lisp
+++ b/src/code/early-cl.lisp
@@ -12,10 +12,10 @@
 (in-package "SB!KERNEL")
 
 ;;; Common Lisp special variables which have SB-XC versions
-(proclaim '(special sb!xc:*macroexpand-hook*))
+(proclaim '(special sb!xc:*macroexpand-hook* sb!xc:*gensym-counter*))
 
 ;;; the Common Lisp defined type spec symbols
-(defparameter *!standard-type-names* 
+(defparameter *!standard-type-names*
   '(array atom bignum bit bit-vector character compiled-function
     complex cons double-float extended-char fixnum float function
     hash-table integer keyword list long-float nil null number package