summaryrefslogtreecommitdiffstats
path: root/tests/event.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-07-21 13:22:08 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-07-21 13:22:08 (GMT)
commit55bf49d15f4347284e30f07c67f8043b0669704f (patch)
treea3ad834ae8e471157c3ed746d5f7e753f997d5a4 /tests/event.test
parentf472165a3dc7d353f90af7f8143d2780b11c93fe (diff)
downloadtcl-55bf49d15f4347284e30f07c67f8043b0669704f.zip
tcl-55bf49d15f4347284e30f07c67f8043b0669704f.tar.gz
tcl-55bf49d15f4347284e30f07c67f8043b0669704f.tar.bz2
Re-enable event-1.1, io-50.? and chan-io-50.? test-cases, trying to get a hand at the problem [f586089a2b]
Diffstat (limited to 'tests/event.test')
-rw-r--r--tests/event.test8
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/event.test b/tests/event.test
index 6e6d116..336c4e4 100644
--- a/tests/event.test
+++ b/tests/event.test
@@ -27,7 +27,7 @@ testConstraint exec [llength [info commands exec]]
test event-1.1 {Tcl_CreateFileHandler, reading} -setup {
testfilehandler close
set result ""
-} -constraints {testfilehandler nonPortable} -body {
+} -constraints testfilehandler -body {
testfilehandler create 0 readable off
testfilehandler clear 0
testfilehandler oneevent
@@ -595,16 +595,16 @@ test event-11.7 {Bug 16828b3744} {
test event-11.8 {Bug 16828b3744} -setup {
oo::class create A {
variable continue
-
+
method start {} {
after idle [self] destroy
-
+
set continue 0
vwait [namespace current]::continue
}
destructor {
set continue 1
- }
+ }
}
} -body {
[A new] start