diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-14 09:39:09 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-14 09:39:09 (GMT) |
commit | d0cfe30a0d61b7b9fe957c29c73ea5aa1d9f8310 (patch) | |
tree | 7bb450068eb4efbc3969ba8fff1e0a991137f3b9 /tests/chan.test | |
parent | 5bef31d2da2eb4ed8f3261ef8276cb2a3b6f3a1e (diff) | |
parent | f0ec68f07293dac2b967d45a3697073b77688970 (diff) | |
download | tcl-d0cfe30a0d61b7b9fe957c29c73ea5aa1d9f8310.zip tcl-d0cfe30a0d61b7b9fe957c29c73ea5aa1d9f8310.tar.gz tcl-d0cfe30a0d61b7b9fe957c29c73ea5aa1d9f8310.tar.bz2 |
Merge 8.6
Diffstat (limited to 'tests/chan.test')
-rw-r--r-- | tests/chan.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/chan.test b/tests/chan.test index 2ca0142..5d05935 100644 --- a/tests/chan.test +++ b/tests/chan.test @@ -173,7 +173,7 @@ test chan-16.9 {chan command: pending input subcommand} -setup { lappend ::chan-16.9-data $r $l $e $b $i - if {$r != -1 || $e || $l || !$b || $i > 128} { + if {$r >= 0 || $e || $l || !$b || $i > 128} { set data [read $sock $i] lappend ::chan-16.9-data [string range $data 0 2] lappend ::chan-16.9-data [string range $data end-2 end] |