Skip to content
This repository
Browse code

Fix "exit from normal thread" test

 The test did not wait for the child to exit, resulting in spurious
 failures on loaded or single-core machines.
  • Loading branch information...
commit 5c6755ecd95f037009d394665ae3d964bac088a7 1 parent 8afcf4f
Paul Khuong pkhuong authored lichtblau committed

Showing 1 changed file with 1 addition and 1 deletion. Show diff stats Hide diff stats

  1. +1 1  tests/threads.test.sh
2  tests/threads.test.sh
@@ -20,7 +20,7 @@ check_status_maybe_lose "return from main thread" $? 0 "ok"
20 20 run_sbcl --eval '(sb-thread:abort-thread :allow-exit t)'
21 21 check_status_maybe_lose "abort main thread" $? 1 "ok"
22 22
23   -run_sbcl --eval '#+sb-thread (sb-thread:make-thread (lambda () (sb-ext:exit :code 77))) #-sb-thread (sb-ext:exit :code 77)'
  23 +run_sbcl --eval '#+sb-thread (sb-thread:join-thread (sb-thread:make-thread (lambda () (sb-ext:exit :code 77)))) #-sb-thread (sb-ext:exit :code 77)'
24 24 check_status_maybe_lose "exit from normal thread" $? 77 "ok"
25 25
26 26 flag="condition-wait-sigcont.tmp"

0 comments on commit 5c6755e

Please sign in to comment.
Something went wrong with that request. Please try again.