diff options
| author | culler <culler> | 2020-08-08 21:37:18 (GMT) |
|---|---|---|
| committer | culler <culler> | 2020-08-08 21:37:18 (GMT) |
| commit | 1cadacd498aa05465ad599e11c5deb0a913d1631 (patch) | |
| tree | c1089a6c3f2bf66fc8bc4db1264228f7a770ab1d /tests/io.test | |
| parent | 4b765a3aff40f73f918d159af41222d1ce972b24 (diff) | |
| download | tcl-1cadacd498aa05465ad599e11c5deb0a913d1631.zip tcl-1cadacd498aa05465ad599e11c5deb0a913d1631.tar.gz tcl-1cadacd498aa05465ad599e11c5deb0a913d1631.tar.bz2 | |
One more vwait.
Diffstat (limited to 'tests/io.test')
| -rw-r--r-- | tests/io.test | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/io.test b/tests/io.test index cfa08ed..a81e394 100644 --- a/tests/io.test +++ b/tests/io.test @@ -6761,7 +6761,9 @@ test io-50.2 {testing handler deletion with multiple handlers} -constraints test testchannelevent $f add readable [namespace code [list delhandler $f 1]] testchannelevent $f add readable [namespace code [list delhandler $f 0]] testservicemode 1 - update + set timer [after 50 lappend z timeout] + vwait z + after cancel $timer set z } -cleanup { close $f |