diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-07-26 11:56:01 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-07-26 11:56:01 (GMT) |
commit | 93f5ab8b03bec7f45aa57cac04a42a42381452f9 (patch) | |
tree | 43f651e81b1684a415fdbbca27076a97bd42f2cd /tests | |
parent | 94d0201025524429b9275d1a5d1886774de497f8 (diff) | |
download | tcl-93f5ab8b03bec7f45aa57cac04a42a42381452f9.zip tcl-93f5ab8b03bec7f45aa57cac04a42a42381452f9.tar.gz tcl-93f5ab8b03bec7f45aa57cac04a42a42381452f9.tar.bz2 |
Increase timeout a little bit, making it less likely that this test failes in a Travis environment.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/ioCmd.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/ioCmd.test b/tests/ioCmd.test index 1cb7c74..057a869 100644 --- a/tests/ioCmd.test +++ b/tests/ioCmd.test @@ -1947,7 +1947,7 @@ test iocmd-31.6 {chan postevent, posted events do happen} -match glob -body { proc foo {args} {oninit; onfinal; track; return} set c [chan create {r w} foo] note [fileevent $c readable {note TOCK}] - set stop [after 10000 {note TIMEOUT}] + set stop [after 15000 {note TIMEOUT}] after 1000 {note [chan postevent $c r]} vwait ::res catch {after cancel $stop} @@ -1960,7 +1960,7 @@ test iocmd-31.7 {chan postevent, posted events do happen} -match glob -body { proc foo {args} {oninit; onfinal; track; return} set c [chan create {r w} foo] note [fileevent $c writable {note TOCK}] - set stop [after 10000 {note TIMEOUT}] + set stop [after 15000 {note TIMEOUT}] after 1000 {note [chan postevent $c w]} vwait ::res catch {after cancel $stop} |