From a33ebfc70324c59441cbf1437559dc205bfec0fa Mon Sep 17 00:00:00 2001 From: dgp Date: Fri, 16 Sep 2011 18:18:58 +0000 Subject: Revise tests. You can't robustly thread::release a thread that's not thread::wait-ing --- tests/unixNotfy.test | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/tests/unixNotfy.test b/tests/unixNotfy.test index 9684bfe..2a17098 100644 --- a/tests/unixNotfy.test +++ b/tests/unixNotfy.test @@ -69,9 +69,8 @@ test unixNotfy-2.1 {Tcl_DeleteFileHandler} \ fileevent $f writable {set x 1} vwait x close $f - set t [thread::create -preserved "thread::send [thread::id] {set x ok}"] + thread::create "thread::send [thread::id] {set x ok}" vwait x - thread::release $t set x } \ -result {ok} \ @@ -91,9 +90,8 @@ test unixNotfy-2.2 {Tcl_DeleteFileHandler} \ close $f1 vwait y close $f2 - set t [thread::create -preserved "thread::send [thread::id] {set x ok}"] + thread::create "thread::send [thread::id] {set x ok}" vwait x - thread::release $t set x } \ -result {ok} \ -- cgit v0.12