X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fthreads.impure.lisp;h=3937dadfee12d1eb6cd634441e91adfbd5b11e8c;hb=955ce74879cc8220d4c97bb1c0f3becd26ad68fc;hp=602c4385ff4c4720782678ec601d828f915f7fcf;hpb=90c4b36715e7173e12fe4af1079a347b2e6fd14b;p=sbcl.git

diff --git a/tests/threads.impure.lisp b/tests/threads.impure.lisp
index 602c438..3937dad 100644
--- a/tests/threads.impure.lisp
+++ b/tests/threads.impure.lisp
@@ -393,7 +393,7 @@
     (test-semaphore-multiple-signals #'busy-wait-on-semaphore)))
 
 ;;; Here we test that interrupting TRY-SEMAPHORE does not leave a
-;;; semaphore in a bad state. 
+;;; semaphore in a bad state.
 (with-test (:name (:try-semaphore :interrupt-safe))
   (flet ((make-threads (count fn)
            (loop repeat count collect (make-thread fn)))
@@ -421,7 +421,7 @@
       ;; Now ensure that the waiting threads will all be waked up,
       ;; i.e. that the semaphore is still working.
       (loop repeat (+ (count-live-threads waiters)
-                      (count-live-threads more-waiters)) 
+                      (count-live-threads more-waiters))
             do (signal-semaphore sem))
       (sleep 0.5)
       (assert (zerop (count-live-threads triers)))