X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fgeneric%2Fvm-fndb.lisp;h=90716af77b373c89bf1a4a1ae57f0a7725ea6f45;hb=d6f9676ae94419cb5544c45821a8d31adbc1fbe8;hp=395695ec0edb90381dbcd6b407474b17bb0fa277;hpb=ecfd159f29d31d2cc08d4e5598346c04c9387636;p=sbcl.git

diff --git a/src/compiler/generic/vm-fndb.lisp b/src/compiler/generic/vm-fndb.lisp
index 395695e..90716af 100644
--- a/src/compiler/generic/vm-fndb.lisp
+++ b/src/compiler/generic/vm-fndb.lisp
@@ -196,11 +196,6 @@
 
 ;;;; threading
 
-#!+(and sb-lutex sb-thread)
-(progn
-  (defknown sb!vm::%make-lutex () sb!vm::lutex ())
-  (defknown sb!vm::lutexp (t) boolean (foldable flushable)))
-
 (defknown (dynamic-space-free-pointer binding-stack-pointer-sap
                                       control-stack-pointer-sap)  ()
   system-area-pointer