X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcode%2Fpred.lisp;h=76286c482b85184f9884fa086f72618944e508e1;hb=992e6a70a0cae3f6d43bdbba18f77306fdf10662;hp=0d34b488681dac92245721ea3f0d399c8bd8d5ab;hpb=568daf6b160280428701670b921f419aabd9eba0;p=sbcl.git

diff --git a/src/code/pred.lisp b/src/code/pred.lisp
index 0d34b48..76286c4 100644
--- a/src/code/pred.lisp
+++ b/src/code/pred.lisp
@@ -74,6 +74,8 @@
   (def-type-predicate-wrapper integerp)
   (def-type-predicate-wrapper listp)
   (def-type-predicate-wrapper long-float-p)
+  #!+(and sb-thread sb-lutex)
+  (def-type-predicate-wrapper lutexp)
   (def-type-predicate-wrapper lra-p)
   (def-type-predicate-wrapper null)
   (def-type-predicate-wrapper numberp)