X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fthread.lisp;h=458095f8f69f11f65cfb0b30837ab7bc03149a7f;hb=860543cc7ba0266e41e1d41ac9b6a208f3795f1a;hp=fcbdd9412b5891f4482d6017bc0129dafc5c5d4a;hpb=670010e3f3dcd62efaf23f61abdc73950edb88c6;p=sbcl.git

diff --git a/src/code/thread.lisp b/src/code/thread.lisp
index fcbdd94..458095f 100644
--- a/src/code/thread.lisp
+++ b/src/code/thread.lisp
@@ -1,4 +1,6 @@
-(in-package :sb!thread)
+(in-package "SB!THREAD")
+
+(defvar *session-lock*)
 
 (sb!xc:defmacro with-recursive-lock ((mutex) &body body)
   #!+sb-thread