diff options
author | gahr <gahr@gahr.ch> | 2016-06-10 12:10:41 (GMT) |
---|---|---|
committer | gahr <gahr@gahr.ch> | 2016-06-10 12:10:41 (GMT) |
commit | 74cee16544d00f49288f1819fb71e1c5c74ce5ad (patch) | |
tree | d77bcc9fb09de474104b1fc59dde7cc6c20b4031 /tests/chan.test | |
parent | 8377ed833a9566731442ef744b419425638d5040 (diff) | |
parent | 03462e2c1dfc9da26f049ee17a3001df257442e4 (diff) | |
download | tcl-74cee16544d00f49288f1819fb71e1c5c74ce5ad.zip tcl-74cee16544d00f49288f1819fb71e1c5c74ce5ad.tar.gz tcl-74cee16544d00f49288f1819fb71e1c5c74ce5ad.tar.bz2 |
Merge trunk
Diffstat (limited to 'tests/chan.test')
-rw-r--r-- | tests/chan.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/chan.test b/tests/chan.test index d8390e2..6808453 100644 --- a/tests/chan.test +++ b/tests/chan.test @@ -135,7 +135,7 @@ test chan-16.4 {chan command: pending subcommand} -body { chan pending {input output} stdout } -returnCodes error -result "bad mode \"input output\": must be input or output" test chan-16.5 {chan command: pending input subcommand} -body { - chan pending input stdout + chan pending input stdout } -result -1 test chan-16.6 {chan command: pending input subcommand} -body { chan pending input stdin @@ -194,7 +194,7 @@ test chan-16.9 {chan command: pending input subcommand} -setup { set ::chan-16.9-data [list] set ::chan-16.9-done 0 } -body { - after idle chan-16.9-client + after idle chan-16.9-client vwait ::chan-16.9-done set ::chan-16.9-data } -result {-1 0 0 1 36 -1 0 0 1 72 -1 0 0 1 108 -1 0 0 1 144 ABC 890} -cleanup { |