X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Ftimer.impure.lisp;h=9886cb510c8e912b9fc1706e5c45b9c4c1987fa5;hb=f31bc323d5bfc205f94164b203833f35033df3cd;hp=c478eb336a7b6c73a28cc12677dec90e2a98bfbe;hpb=decddddf7e581fa1ebee846e5fddcd52229bb9a8;p=sbcl.git

diff --git a/tests/timer.impure.lisp b/tests/timer.impure.lisp
index c478eb3..9886cb5 100644
--- a/tests/timer.impure.lisp
+++ b/tests/timer.impure.lisp
@@ -240,7 +240,11 @@
 ;;; running out of stack (due to repeating timers being rescheduled
 ;;; before they ran) and dying threads were open interrupts.
 #+sb-thread
-(with-test (:name (:timer :parallel-unschedule))
+(with-test (:name (:timer :parallel-unschedule) :fails-on :ppc)
+  #+darwin
+  (error "Prone to hang on Darwin due to interrupt issues.")
+  #+ppc
+  (error "Prone to hang the host on linux/ppc for unknown reasons.")
   (let ((timer (sb-ext:make-timer (lambda () 42) :name "parallel schedulers"))
         (other nil))
     (flet ((flop ()