/running tests on '/usr/local/google/home/brown/software/source-trees/sbcl/tests/../src/runtime/sbcl --core /usr/local/google/home/brown/software/source-trees/sbcl/tests/../output/sbcl.core --noinform --no-sysinit --no-userinit --noprint --disable-debugger'
// Running pure tests (#<FUNCTION RUN-TESTS::LOAD-TEST>)
// Running pure tests (#<FUNCTION RUN-TESTS::CLOAD-TEST>)
// Running impure tests (#<FUNCTION RUN-TESTS::LOAD-TEST>)
// Running /usr/local/google/home/brown/software/source-trees/sbcl/tests/timer.impure.lisp
::: Running :HEAP
::: Success :HEAP
::: Running (:TIMER :DEFERRABLES-BLOCKED)
::: Success (:TIMER :DEFERRABLES-BLOCKED)
::: Running (:TIMER :DEFERRABLES-UNBLOCKED)
::: Success (:TIMER :DEFERRABLES-UNBLOCKED)
::: Running (:TIMER :DEFERRABLES-UNBLOCKED :UNWIND)
::: Success (:TIMER :DEFERRABLES-UNBLOCKED :UNWIND)
::: Running (:TIMER :RELATIVE)
::: Success (:TIMER :RELATIVE)
::: Running (:TIMER :ABSOLUTE)
::: Success (:TIMER :ABSOLUTE)
::: Running (:TIMER :OTHER-THREAD)
::: Success (:TIMER :OTHER-THREAD)
::: Running (:TIMER :NEW-THREAD)
::: Success (:TIMER :NEW-THREAD)
::: Running (:TIMER :REPEAT-AND-UNSCHEDULE)
WARNING:
   Timer #<TIMER {10034A0BF3}> failed to interrupt thread #<SB-THREAD:THREAD
                                                            ABORTED
                                                             {10034A0A93}>.
::: Success (:TIMER :REPEAT-AND-UNSCHEDULE)
::: Running (:TIMER :RESCHEDULE)
::: Success (:TIMER :RESCHEDULE)
::: Running (:TIMER :STRESS)
::: Success (:TIMER :STRESS)
::: Running (:TIMER :STRESS2)
::: Success (:TIMER :STRESS2)
::: Running (:WITH-TIMEOUT :TIMEOUT)
::: Success (:WITH-TIMEOUT :TIMEOUT)
::: Running (:WITH-TIMEOUT :FALL-THROUGH)
::: Success (:WITH-TIMEOUT :FALL-THROUGH)
::: Running (:WITH-TIMEOUT :NESTED-TIMEOUT-SMALLER)
::: Success (:WITH-TIMEOUT :NESTED-TIMEOUT-SMALLER)
::: Running (:WITH-TIMEOUT :NESTED-TIMEOUT-BIGGER)
::: Success (:WITH-TIMEOUT :NESTED-TIMEOUT-BIGGER)
::: Running (:WITH-TIMEOUT :MANY-AT-THE-SAME-TIME)
::: Success (:WITH-TIMEOUT :MANY-AT-THE-SAME-TIME)
::: Running (:WITH-TIMEOUT :DEAD-THREAD)
WARNING:
   Timer #<TIMER {1005CE00F3}> failed to interrupt thread #<SB-THREAD:THREAD
                                                            FINISHED values: NIL
                                                            {1005CDE163}>.
::: Success (:WITH-TIMEOUT :DEAD-THREAD)
::: Running (:HASH-CACHE :INTERRUPT)
::: Success (:HASH-CACHE :INTERRUPT)
::: Running (:TIMER :PARALLEL-UNSCHEDULE)
WARNING:
   Unscheduling timer #<TIMER "ticker 3"
                        {1003318A63}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 4"
                        {10033191D3}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 1"
                        {100330FB73}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 2"
                        {10033182F3}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 5"
                        {1003319943}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 8"
                        {100331AFC3}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 6"
                        {100331A0C3}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 7"
                        {100331A843}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 9"
                        {100331B743}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 10"
                        {100331BED3}> upon reaching run limit. System too slow?
WARNING:
   Timer #<TIMER "ticker 1"
           {100331C723}> failed to interrupt thread #<SB-THREAD:THREAD
                                                      "scheduler 10" FINISHED values: NIL
                                                      {100331BB23}>.
WARNING:
   Unscheduling timer #<TIMER "ticker 3"
                        {100331D603}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 2"
                        {100331CE93}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 4"
                        {100331DD83}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 5"
                        {100331E503}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 6"
                        {100331EC83}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 8"
                        {100331FB73}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 9"
                        {1003360433}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 7"
                        {100331F403}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 10"
                        {1003360BC3}> upon reaching run limit. System too slow?
WARNING:
   Timer #<TIMER "ticker 1"
           {1003361433}> failed to interrupt thread #<SB-THREAD:THREAD
                                                      "scheduler 10" FINISHED values: NIL
                                                      {1003360813}>.
WARNING:
   Unscheduling timer #<TIMER "ticker 2"
                        {1003361BA3}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 3"
                        {1003362313}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 4"
                        {1003362A93}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 5"
                        {1003363213}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 6"
                        {1003363983}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 8"
                        {1003364883}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 7"
                        {1003364103}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 9"
                        {1003364FF3}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 10"
                        {1003365773}> upon reaching run limit. System too slow?
WARNING:
   Timer #<TIMER "ticker 1"
           {1003366003}> failed to interrupt thread #<SB-THREAD:THREAD
                                                      "scheduler 10" FINISHED values: NIL
                                                      {10033653C3}>.
WARNING:
   Timer #<TIMER "ticker 9"
           {100359DFC3}> failed to interrupt thread #<SB-THREAD:THREAD
                                                      "scheduler 8" FINISHED values: NIL
                                                      {100359D483}>.
WARNING:
   Timer #<TIMER "ticker 3"
           {1003366EE3}> failed to interrupt thread #<SB-THREAD:THREAD
                                                      "scheduler 2" FINISHED values: NIL
                                                      {10033663C3}>.
WARNING:
   Timer #<TIMER "ticker 8"
           {100359D833}> failed to interrupt thread #<SB-THREAD:THREAD
                                                      "scheduler 7" FINISHED values: NIL
                                                      {100359CD13}>.
WARNING:
   Unscheduling timer #<TIMER "ticker 2"
                        {1003366773}> upon reaching run limit. System too slow?
WARNING:
   Unscheduling timer #<TIMER "ticker 4"
                        {1003367663}> upon reaching run limit. System too slow?
WARNING:
   Timer #<TIMER "ticker 5"
           {1003367DE3}> failed to interrupt thread #<SB-THREAD:THREAD
                                                      "scheduler 4" FINISHED values: NIL
                                                      {10033672B3}>.
WARNING:
   Timer #<TIMER "ticker 10"
           {100359E753}> failed to interrupt thread #<SB-THREAD:THREAD
                                                      "scheduler 9" FINISHED values: NIL
                                                      {100359DC03}>.
WARNING:
   Timer #<TIMER "ticker 6"
           {100359C953}> failed to interrupt thread #<SB-THREAD:THREAD
                                                      "scheduler 5" FINISHED values: NIL
                                                      {1003367A33}>.
WARNING:
   Timer #<TIMER "ticker 7"
           {100359D0C3}> failed to interrupt thread #<SB-THREAD:THREAD
                                                      "scheduler 6" FINISHED values: NIL
                                                      {100359C593}>.
WARNING:
   Timer #<TIMER "ticker 1"
           {100359EFC3}> failed to interrupt thread #<SB-THREAD:THREAD
                                                      "scheduler 10" FINISHED values: NIL
                                                      {100359E3A3}>.
Unhandled SB-SYS:DEADLINE-TIMEOUT in thread #<SB-THREAD:THREAD
                                              "main thread" waiting on:
                                                 #<MUTEX "Scheduler lock"
                                                     owner: #<SB-THREAD:THREAD
                                                              "System timer watchdog thread" RUNNING
                                                               {100565C5F3}>>
                                                 timeout:
                                                 30.0
                                               {1002B6FEE3}>:
  A deadline was reached after 30.0 seconds.

Backtrace for: #<SB-THREAD:THREAD "main thread" waiting on: #<MUTEX "Scheduler lock" owner: #<SB-THREAD:THREAD "System timer watchdog thread" RUNNING {100565C5F3}>> timeout:  30.0 {1002B6FEE3}>
0: ((LAMBDA NIL :IN SB-DEBUG::FUNCALL-WITH-DEBUG-IO-SYNTAX))
1: (SB-IMPL::CALL-WITH-SANE-IO-SYNTAX #<CLOSURE (LAMBDA NIL :IN SB-DEBUG::FUNCALL-WITH-DEBUG-IO-SYNTAX) {1003D2A98B}>)
2: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #<CLOSURE (LAMBDA NIL :IN SB-DEBUG::FUNCALL-WITH-DEBUG-IO-SYNTAX) {1003D2A95B}>)
3: (PRINT-BACKTRACE :STREAM #<SYNONYM-STREAM :SYMBOL SB-SYS:*STDERR* {1000177563}> :START 0 :FROM :INTERRUPTED-FRAME :COUNT NIL :PRINT-THREAD T :PRINT-FRAME-SOURCE NIL :METHOD-FRAME-STYLE NIL)
4: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<SB-SYS:DEADLINE-TIMEOUT {100385D2C3}> #<unavailable argument>)
5: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<SB-SYS:DEADLINE-TIMEOUT {100385D2C3}>)
6: (INVOKE-DEBUGGER #<SB-SYS:DEADLINE-TIMEOUT {100385D2C3}>)
7: (ERROR #<SB-SYS:DEADLINE-TIMEOUT {100385D2C3}>)
8: (SB-SYS:SIGNAL-DEADLINE)
9: (SB-THREAD::%WAIT-FOR-MUTEX #<SB-THREAD:MUTEX "Scheduler lock" owner: #<SB-THREAD:THREAD "System timer watchdog thread" RUNNING {100565C5F3}>> #<SB-THREAD:THREAD "main thread" waiting on: #<MUTEX "Scheduler lock" owner: #<SB-THREAD:THREAD "System timer watchdog thread" RUNNING {100565C5F3}>> timeout:  30.0 {1002B6FEE3}> NIL 25 663000 51 311000 T)
10: ((FLET #:WITHOUT-INTERRUPTS-BODY-473 :IN SB-THREAD::CALL-WITH-SYSTEM-MUTEX))
11: (SB-THREAD::CALL-WITH-SYSTEM-MUTEX #<CLOSURE (FLET SB-THREAD::WITH-SYSTEM-MUTEX-THUNK :IN SCHEDULE-TIMER) {7FFFF6E8ECAB}> #<SB-THREAD:MUTEX "Scheduler lock" owner: #<SB-THREAD:THREAD "System timer watchdog thread" RUNNING {100565C5F3}>>)
12: (SCHEDULE-TIMER #<TIMER "ticker 5" {100385D0E3}> 0 :REPEAT-INTERVAL 1.e-5 :ABSOLUTE-P NIL)
13: ((LAMBDA NIL :IN "/usr/local/google/home/brown/software/source-trees/sbcl/tests/timer.impure.lisp"))
14: (SB-INT:SIMPLE-EVAL-IN-LEXENV (COND (T (LET ((#1=#:THREADS846 (SB-THREAD:LIST-ALL-THREADS)) (TEST-UTIL::*THREADS-TO-JOIN* NIL) (TEST-UTIL::*THREADS-TO-KILL* NIL)) (BLOCK #2=#:G845 (HANDLER-BIND ((ERROR (LAMBDA (ERROR) (IF (TEST-UTIL::EXPECTED-FAILURE-P NIL) (TEST-UTIL::FAIL-TEST :EXPECTED-FAILURE (QUOTE #3=(:TIMER :PARALLEL-UNSCHEDULE)) ERROR) (TEST-UTIL::FAIL-TEST :UNEXPECTED-FAILURE (QUOTE #3#) ERROR)) (RETURN-FROM #2#)))) (PROGN (TEST-UTIL::LOG-MSG "Running ~S" (QUOTE #3#)) (LET ((TIMER (MAKE-TIMER (LAMBDA NIL 42) :NAME "parallel schedulers")) (OTHER NIL)) (FLET ((FLOP NIL (SLEEP (RANDOM 0.01)) (LOOP REPEAT 10000 DO (UNSCHEDULE-TIMER TIMER)))) (SB-SYS:WITH-DEADLINE (:SECONDS 30) (LOOP REPEAT 5 DO (MAPCAR (FUNCTION SB-THREAD:JOIN-THREAD) (LOOP FOR I FROM 1 UPTO 10 COLLECT (LET* ((THREAD (SB-THREAD:MAKE-THREAD (FUNCTION FLOP) :NAME (FORMAT NIL "scheduler ~A" I))) (TICKER (MAKE-LIMITED-TIMER (LAMBDA NIL 13) 1000 :THREAD (OR OTHER THREAD) :NAME (FORMAT NIL "ticker ~A" I)))) (SETF OTHER THREAD) (SCHEDULE-TIMER TICKER 0 :REPEAT-INTERVAL 1.e-5) THREAD))))))) (LET ((TEST-UTIL::ANY-LEFTOVER NIL)) (DOLIST (TEST-UTIL::THREAD TEST-UTIL::*THREADS-TO-JOIN*) (IGNORE-ERRORS (SB-THREAD:JOIN-THREAD TEST-UTIL::THREAD))) (DOLIST (TEST-UTIL::THREAD TEST-UTIL::*THREADS-TO-KILL*) (IGNORE-ERRORS (SB-THREAD:TERMINATE-THREAD TEST-UTIL::THREAD))) (SETF #1# (UNION (UNION TEST-UTIL::*THREADS-TO-KILL* TEST-UTIL::*THREADS-TO-JOIN*) #1#)) (DOLIST (TEST-UTIL::THREAD (SB-THREAD:LIST-ALL-THREADS)) (UNLESS (OR (NOT (SB-THREAD:THREAD-ALIVE-P TEST-UTIL::THREAD)) (EQL TEST-UTIL::THREAD SB-THREAD:*CURRENT-THREAD*) (MEMBER TEST-UTIL::THREAD #1#) (SB-THREAD:THREAD-EMPHEMERAL-P TEST-UTIL::THREAD)) (SETF TEST-UTIL::ANY-LEFTOVER TEST-UTIL::THREAD) (IGNORE-ERRORS (SB-THREAD:TERMINATE-THREAD TEST-UTIL::THREAD)))) (WHEN TEST-UTIL::ANY-LEFTOVER (TEST-UTIL::FAIL-TEST :LEFTOVER-THREAD (QUOTE #3#) TEST-UTIL::ANY-LEFTOVER) (RETURN-FROM #2#))) (IF (TEST-UTIL::EXPECTED-FAILURE-P NIL) (TEST-UTIL::FAIL-TEST :UNEXPECTED-SUCCESS (QUOTE #3#) NIL) (TEST-UTIL::LOG-MSG "Success ~S" (QUOTE #3#))))))))) #<NULL-LEXENV>)
15: (SB-INT:SIMPLE-EVAL-IN-LEXENV (COND ((TEST-UTIL::SKIPPED-P (QUOTE (NOT :SB-THREAD))) (TEST-UTIL::FAIL-TEST :SKIPPED-DISABLED (QUOTE #1=(:TIMER :PARALLEL-UNSCHEDULE)) "Test disabled for this combination of platform and features")) (T (LET ((#2=#:THREADS846 (SB-THREAD:LIST-ALL-THREADS)) (TEST-UTIL::*THREADS-TO-JOIN* NIL) (TEST-UTIL::*THREADS-TO-KILL* NIL)) (BLOCK #3=#:G845 (HANDLER-BIND ((ERROR (LAMBDA (ERROR) (IF (TEST-UTIL::EXPECTED-FAILURE-P NIL) (TEST-UTIL::FAIL-TEST :EXPECTED-FAILURE (QUOTE #1#) ERROR) (TEST-UTIL::FAIL-TEST :UNEXPECTED-FAILURE (QUOTE #1#) ERROR)) (RETURN-FROM #3#)))) (PROGN (TEST-UTIL::LOG-MSG "Running ~S" (QUOTE #1#)) (LET ((TIMER (MAKE-TIMER (LAMBDA NIL 42) :NAME "parallel schedulers")) (OTHER NIL)) (FLET ((FLOP NIL (SLEEP (RANDOM 0.01)) (LOOP REPEAT 10000 DO (UNSCHEDULE-TIMER TIMER)))) (SB-SYS:WITH-DEADLINE (:SECONDS 30) (LOOP REPEAT 5 DO (MAPCAR (FUNCTION SB-THREAD:JOIN-THREAD) (LOOP FOR I FROM 1 UPTO 10 COLLECT (LET* ((THREAD (SB-THREAD:MAKE-THREAD (FUNCTION FLOP) :NAME (FORMAT NIL "scheduler ~A" I))) (TICKER (MAKE-LIMITED-TIMER (LAMBDA NIL 13) 1000 :THREAD (OR OTHER THREAD) :NAME (FORMAT NIL "ticker ~A" I)))) (SETF OTHER THREAD) (SCHEDULE-TIMER TICKER 0 :REPEAT-INTERVAL 1.e-5) THREAD))))))) (LET ((TEST-UTIL::ANY-LEFTOVER NIL)) (DOLIST (TEST-UTIL::THREAD TEST-UTIL::*THREADS-TO-JOIN*) (IGNORE-ERRORS (SB-THREAD:JOIN-THREAD TEST-UTIL::THREAD))) (DOLIST (TEST-UTIL::THREAD TEST-UTIL::*THREADS-TO-KILL*) (IGNORE-ERRORS (SB-THREAD:TERMINATE-THREAD TEST-UTIL::THREAD))) (SETF #2# (UNION (UNION TEST-UTIL::*THREADS-TO-KILL* TEST-UTIL::*THREADS-TO-JOIN*) #2#)) (DOLIST (TEST-UTIL::THREAD (SB-THREAD:LIST-ALL-THREADS)) (UNLESS (OR (NOT (SB-THREAD:THREAD-ALIVE-P TEST-UTIL::THREAD)) (EQL TEST-UTIL::THREAD SB-THREAD:*CURRENT-THREAD*) (MEMBER TEST-UTIL::THREAD #2#) (SB-THREAD:THREAD-EMPHEMERAL-P TEST-UTIL::THREAD)) (SETF TEST-UTIL::ANY-LEFTOVER TEST-UTIL::THREAD) (IGNORE-ERRORS (SB-THREAD:TERMINATE-THREAD TEST-UTIL::THREAD)))) (WHEN TEST-UTIL::ANY-LEFTOVER (TEST-UTIL::FAIL-TEST :LEFTOVER-THREAD (QUOTE #1#) TEST-UTIL::ANY-LEFTOVER) (RETURN-FROM #3#))) (IF (TEST-UTIL::EXPECTED-FAILURE-P NIL) (TEST-UTIL::FAIL-TEST :UNEXPECTED-SUCCESS (QUOTE #1#) NIL) (TEST-UTIL::LOG-MSG "Success ~S" (QUOTE #1#))))))))) #<NULL-LEXENV>)
16: (SB-INT:SIMPLE-EVAL-IN-LEXENV (COND ((TEST-UTIL::BROKEN-P (QUOTE :PPC)) (TEST-UTIL::FAIL-TEST :SKIPPED-BROKEN (QUOTE #1=(:TIMER :PARALLEL-UNSCHEDULE)) "Test broken on this platform")) ((TEST-UTIL::SKIPPED-P (QUOTE (NOT :SB-THREAD))) (TEST-UTIL::FAIL-TEST :SKIPPED-DISABLED (QUOTE #1#) "Test disabled for this combination of platform and features")) (T (LET ((#2=#:THREADS846 (SB-THREAD:LIST-ALL-THREADS)) (TEST-UTIL::*THREADS-TO-JOIN* NIL) (TEST-UTIL::*THREADS-TO-KILL* NIL)) (BLOCK #3=#:G845 (HANDLER-BIND ((ERROR (LAMBDA (ERROR) (IF (TEST-UTIL::EXPECTED-FAILURE-P NIL) (TEST-UTIL::FAIL-TEST :EXPECTED-FAILURE (QUOTE #1#) ERROR) (TEST-UTIL::FAIL-TEST :UNEXPECTED-FAILURE (QUOTE #1#) ERROR)) (RETURN-FROM #3#)))) (PROGN (TEST-UTIL::LOG-MSG "Running ~S" (QUOTE #1#)) (LET ((TIMER (MAKE-TIMER (LAMBDA NIL 42) :NAME "parallel schedulers")) (OTHER NIL)) (FLET ((FLOP NIL (SLEEP (RANDOM 0.01)) (LOOP REPEAT 10000 DO (UNSCHEDULE-TIMER TIMER)))) (SB-SYS:WITH-DEADLINE (:SECONDS 30) (LOOP REPEAT 5 DO (MAPCAR (FUNCTION SB-THREAD:JOIN-THREAD) (LOOP FOR I FROM 1 UPTO 10 COLLECT (LET* ((THREAD (SB-THREAD:MAKE-THREAD (FUNCTION FLOP) :NAME (FORMAT NIL "scheduler ~A" I))) (TICKER (MAKE-LIMITED-TIMER (LAMBDA NIL 13) 1000 :THREAD (OR OTHER THREAD) :NAME (FORMAT NIL "ticker ~A" I)))) (SETF OTHER THREAD) (SCHEDULE-TIMER TICKER 0 :REPEAT-INTERVAL 1.e-5) THREAD))))))) (LET ((TEST-UTIL::ANY-LEFTOVER NIL)) (DOLIST (TEST-UTIL::THREAD TEST-UTIL::*THREADS-TO-JOIN*) (IGNORE-ERRORS (SB-THREAD:JOIN-THREAD TEST-UTIL::THREAD))) (DOLIST (TEST-UTIL::THREAD TEST-UTIL::*THREADS-TO-KILL*) (IGNORE-ERRORS (SB-THREAD:TERMINATE-THREAD TEST-UTIL::THREAD))) (SETF #2# (UNION (UNION TEST-UTIL::*THREADS-TO-KILL* TEST-UTIL::*THREADS-TO-JOIN*) #2#)) (DOLIST (TEST-UTIL::THREAD (SB-THREAD:LIST-ALL-THREADS)) (UNLESS (OR (NOT (SB-THREAD:THREAD-ALIVE-P TEST-UTIL::THREAD)) (EQL TEST-UTIL::THREAD SB-THREAD:*CURRENT-THREAD*) (MEMBER TEST-UTIL::THREAD #2#) (SB-THREAD:THREAD-EMPHEMERAL-P TEST-UTIL::THREAD)) (SETF TEST-UTIL::ANY-LEFTOVER TEST-UTIL::THREAD) (IGNORE-ERRORS (SB-THREAD:TERMINATE-THREAD TEST-UTIL::THREAD)))) (WHEN TEST-UTIL::ANY-LEFTOVER (TEST-UTIL::FAIL-TEST :LEFTOVER-THREAD (QUOTE #1#) TEST-UTIL::ANY-LEFTOVER) (RETURN-FROM #3#))) (IF (TEST-UTIL::EXPECTED-FAILURE-P NIL) (TEST-UTIL::FAIL-TEST :UNEXPECTED-SUCCESS (QUOTE #1#) NIL) (TEST-UTIL::LOG-MSG "Success ~S" (QUOTE #1#))))))))) #<NULL-LEXENV>)
17: (SB-INT:SIMPLE-EVAL-IN-LEXENV (WITH-TEST (:NAME (:TIMER :PARALLEL-UNSCHEDULE) :SKIPPED-ON (QUOTE (NOT :SB-THREAD)) :BROKEN-ON (QUOTE :PPC)) (LET ((TIMER (MAKE-TIMER (LAMBDA NIL 42) :NAME "parallel schedulers")) (OTHER NIL)) (FLET ((FLOP NIL (SLEEP (RANDOM 0.01)) (LOOP REPEAT 10000 DO (UNSCHEDULE-TIMER TIMER)))) (SB-SYS:WITH-DEADLINE (:SECONDS 30) (LOOP REPEAT 5 DO (MAPCAR (FUNCTION SB-THREAD:JOIN-THREAD) (LOOP FOR I FROM 1 UPTO 10 COLLECT (LET* ((THREAD (SB-THREAD:MAKE-THREAD (FUNCTION FLOP) :NAME (FORMAT NIL "scheduler ~A" I))) (TICKER (MAKE-LIMITED-TIMER (LAMBDA NIL 13) 1000 :THREAD (OR OTHER THREAD) :NAME (FORMAT NIL "ticker ~A" I)))) (SETF OTHER THREAD) (SCHEDULE-TIMER TICKER 0 :REPEAT-INTERVAL 1.e-5) THREAD)))))))) #<NULL-LEXENV>)
18: (EVAL-TLF (WITH-TEST (:NAME (:TIMER :PARALLEL-UNSCHEDULE) :SKIPPED-ON (QUOTE (NOT :SB-THREAD)) :BROKEN-ON (QUOTE :PPC)) (LET ((TIMER (MAKE-TIMER (LAMBDA NIL 42) :NAME "parallel schedulers")) (OTHER NIL)) (FLET ((FLOP NIL (SLEEP (RANDOM 0.01)) (LOOP REPEAT 10000 DO (UNSCHEDULE-TIMER TIMER)))) (SB-SYS:WITH-DEADLINE (:SECONDS 30) (LOOP REPEAT 5 DO (MAPCAR (FUNCTION SB-THREAD:JOIN-THREAD) (LOOP FOR I FROM 1 UPTO 10 COLLECT (LET* ((THREAD (SB-THREAD:MAKE-THREAD (FUNCTION FLOP) :NAME (FORMAT NIL "scheduler ~A" I))) (TICKER (MAKE-LIMITED-TIMER (LAMBDA NIL 13) 1000 :THREAD (OR OTHER THREAD) :NAME (FORMAT NIL "ticker ~A" I)))) (SETF OTHER THREAD) (SCHEDULE-TIMER TICKER 0 :REPEAT-INTERVAL 1.e-5) THREAD)))))))) 28 #<NULL-LEXENV>)
19: ((FLET SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (WITH-TEST (:NAME (:TIMER :PARALLEL-UNSCHEDULE) :SKIPPED-ON (QUOTE (NOT :SB-THREAD)) :BROKEN-ON (QUOTE :PPC)) (LET ((TIMER (MAKE-TIMER (LAMBDA NIL 42) :NAME "parallel schedulers")) (OTHER NIL)) (FLET ((FLOP NIL (SLEEP (RANDOM 0.01)) (LOOP REPEAT 10000 DO (UNSCHEDULE-TIMER TIMER)))) (SB-SYS:WITH-DEADLINE (:SECONDS 30) (LOOP REPEAT 5 DO (MAPCAR (FUNCTION SB-THREAD:JOIN-THREAD) (LOOP FOR I FROM 1 UPTO 10 COLLECT (LET* ((THREAD (SB-THREAD:MAKE-THREAD (FUNCTION FLOP) :NAME (FORMAT NIL "scheduler ~A" I))) (TICKER (MAKE-LIMITED-TIMER (LAMBDA NIL 13) 1000 :THREAD (OR OTHER THREAD) :NAME (FORMAT NIL "ticker ~A" I)))) (SETF OTHER THREAD) (SCHEDULE-TIMER TICKER 0 :REPEAT-INTERVAL 1.e-5) THREAD)))))))) 28)
20: (SB-INT:LOAD-AS-SOURCE #<SB-SYS:FD-STREAM for "file /usr/local/google/home/brown/software/source-trees/sbcl/tests/timer.impure.lisp" {1004ABD6A3}> :VERBOSE NIL :PRINT NIL :CONTEXT "loading")
21: ((FLET SB-FASL::LOAD-STREAM :IN LOAD) #<SB-SYS:FD-STREAM for "file /usr/local/google/home/brown/software/source-trees/sbcl/tests/timer.impure.lisp" {1004ABD6A3}> NIL)
22: (LOAD #P"/usr/local/google/home/brown/software/source-trees/sbcl/tests/timer.impure.lisp" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST T :EXTERNAL-FORMAT :DEFAULT)
23: ((LAMBDA ()))
24: (SB-INT:SIMPLE-EVAL-IN-LEXENV (LET ((RUN-TESTS::FILE #P"/usr/local/google/home/brown/software/source-trees/sbcl/tests/timer.impure.lisp") (RUN-TESTS::*BREAK-ON-ERROR* NIL)) (DECLARE (SPECIAL RUN-TESTS::*BREAK-ON-ERROR*)) (FORMAT T "// Running ~a~%" RUN-TESTS::FILE) (RESTART-CASE (HANDLER-BIND ((ERROR (LAMBDA (CONDITION) (PUSH (LIST :UNHANDLED-ERROR RUN-TESTS::FILE) *FAILURES*) (COND (RUN-TESTS::*BREAK-ON-ERROR* (REALLY-INVOKE-DEBUGGER CONDITION)) (T (FORMAT *ERROR-OUTPUT* "~&Unhandled ~a: ~a~%" (TYPE-OF CONDITION) CONDITION) (PRINT-BACKTRACE))) (INVOKE-RESTART (QUOTE RUN-TESTS::SKIP-FILE))))) (LOAD #P"/usr/local/google/home/brown/software/source-trees/sbcl/tests/timer.impure.lisp")) (RUN-TESTS::SKIP-FILE NIL (FORMAT T ">>>~a<<<~%" *FAILURES*))) (REPORT-TEST-STATUS) (EXIT :CODE 104)) #<NULL-LEXENV>)
25: (EVAL (LET ((RUN-TESTS::FILE #P"/usr/local/google/home/brown/software/source-trees/sbcl/tests/timer.impure.lisp") (RUN-TESTS::*BREAK-ON-ERROR* NIL)) (DECLARE (SPECIAL RUN-TESTS::*BREAK-ON-ERROR*)) (FORMAT T "// Running ~a~%" RUN-TESTS::FILE) (RESTART-CASE (HANDLER-BIND ((ERROR (LAMBDA (CONDITION) (PUSH (LIST :UNHANDLED-ERROR RUN-TESTS::FILE) *FAILURES*) (COND (RUN-TESTS::*BREAK-ON-ERROR* (REALLY-INVOKE-DEBUGGER CONDITION)) (T (FORMAT *ERROR-OUTPUT* "~&Unhandled ~a: ~a~%" (TYPE-OF CONDITION) CONDITION) (PRINT-BACKTRACE))) (INVOKE-RESTART (QUOTE RUN-TESTS::SKIP-FILE))))) (LOAD #P"/usr/local/google/home/brown/software/source-trees/sbcl/tests/timer.impure.lisp")) (RUN-TESTS::SKIP-FILE NIL (FORMAT T ">>>~a<<<~%" *FAILURES*))) (REPORT-TEST-STATUS) (EXIT :CODE 104)))
26: (SB-IMPL::PROCESS-EVAL/LOAD-OPTIONS ((:EVAL . "(LOAD \"test-util\")") (:EVAL . "(LOAD \"assertoid\")") (:EVAL . "(DEFPACKAGE :RUN-TESTS
  (:USE :CL :TEST-UTIL :SB-EXT))") (:EVAL . "(IN-PACKAGE :CL-USER)") (:EVAL . "(USE-PACKAGE :TEST-UTIL)") (:EVAL . "(USE-PACKAGE :ASSERTOID)") (:EVAL . "(SETF *BREAK-ON-FAILURE* NIL)") (:EVAL . "(SETF *BREAK-ON-EXPECTED-FAILURE* NIL)") (:EVAL . "(LET ((RUN-TESTS::FILE
       #P\"/usr/local/google/home/brown/software/source-trees/sbcl/tests/timer.impure.lisp\")
      (RUN-TESTS::*BREAK-ON-ERROR* NIL))
  (DECLARE (SPECIAL RUN-TESTS::*BREAK-ON-ERROR*))
  (FORMAT T \"// Running ~a~%\" RUN-TESTS::FILE)
  (RESTART-CASE (HANDLER-BIND ((ERROR
                                (LAMBDA (CONDITION)
                                  (PUSH (LIST :UNHANDLED-ERROR RUN-TESTS::FILE)
                                        *FAILURES*)
                                  (COND
                                   (RUN-TESTS::*BREAK-ON-ERROR*
                                    (REALLY-INVOKE-DEBUGGER CONDITION))
                                   (T
                                    (FORMAT *ERROR-OUTPUT*
                                            \"~&Unhandled ~a: ~a~%\"
                                            (TYPE-OF CONDITION) CONDITION)
                                    (PRINT-BACKTRACE)))
                                  (INVOKE-RESTART 'RUN-TESTS::SKIP-FILE))))
                  (LOAD
                   #P\"/usr/local/google/home/brown/software/source-trees/sbcl/tests/timer.impure.lisp\"))
    (RUN-TESTS::SKIP-FILE NIL (FORMAT T \">>>~a<<<~%\" *FAILURES*)))
  (REPORT-TEST-STATUS)
  (EXIT :CODE 104))")))
27: (SB-IMPL::TOPLEVEL-INIT)
28: ((FLET #:WITHOUT-INTERRUPTS-BODY-54 :IN SAVE-LISP-AND-DIE))
29: ((LABELS SB-IMPL::RESTART-LISP :IN SAVE-LISP-AND-DIE))

unhandled condition in --disable-debugger mode, quitting
// Running impure tests (#<FUNCTION RUN-TESTS::CLOAD-TEST>)
// Running impure tests (#<FUNCTION RUN-TESTS::SH-TEST>)

Finished running tests.
Status:
 Invalid exit status: timer.impure.lisp
test failed, expected 104 return code, got 1