summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2011-09-16 18:18:58 (GMT)
committerdgp <dgp@users.sourceforge.net>2011-09-16 18:18:58 (GMT)
commita33ebfc70324c59441cbf1437559dc205bfec0fa (patch)
tree37ab6d58ca7fa22dae0e3e6c2be27bd55cf5bf78 /tests
parenta46ead9692a9b2e6ddedba10dc6e11d3cb6bfdda (diff)
downloadtcl-a33ebfc70324c59441cbf1437559dc205bfec0fa.zip
tcl-a33ebfc70324c59441cbf1437559dc205bfec0fa.tar.gz
tcl-a33ebfc70324c59441cbf1437559dc205bfec0fa.tar.bz2
Revise tests. You can't robustly thread::release a thread that's not thread::wait-ing
Diffstat (limited to 'tests')
-rw-r--r--tests/unixNotfy.test6
1 files 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} \