X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fthreads.impure.lisp;h=11b39cf1c84e5ae89e42107d64b24fea0b59168e;hb=007bcd5aac2f3a1e714563bd39f7a2db2d0bf7c2;hp=aeb807efaf3cd0234ef523140d421684d6789f8e;hpb=cf507f95509a855a752b6f1771aa06877b8a3b30;p=sbcl.git

diff --git a/tests/threads.impure.lisp b/tests/threads.impure.lisp
index aeb807e..11b39cf 100644
--- a/tests/threads.impure.lisp
+++ b/tests/threads.impure.lisp
@@ -873,6 +873,9 @@
 |     (mp:make-process #'roomy)))
 |#
 
+;;; KLUDGE: No deadlines while waiting on lutex-based condition variables. This test
+;;; would just hang.
+#-sb-lutex
 (with-test (:name (:condition-variable :wait-multiple))
   (loop repeat 40 do
         (let ((waitqueue (sb-thread:make-waitqueue :name "Q"))