diff options
| author | ferrieux <ferrieux@users.sourceforge.net> | 2012-05-02 21:15:20 (GMT) |
|---|---|---|
| committer | ferrieux <ferrieux@users.sourceforge.net> | 2012-05-02 21:15:20 (GMT) |
| commit | 4d4bf76067435ab8ee023cd79d453fcb9aafcef9 (patch) | |
| tree | d5ede0587201812901dd89f73ceaca699d7c764b /tests | |
| parent | 76c81b20b6039773ba19982279d04dbf2306cc68 (diff) | |
| download | tcl-bug_3522560.zip tcl-bug_3522560.tar.gz tcl-bug_3522560.tar.bz2 | |
Explicitly declare a channel nonblocking before throwing EAGAIN on write.bug_3522560
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/ioCmd.test | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/ioCmd.test b/tests/ioCmd.test index 6b1da73..56a9228 100644 --- a/tests/ioCmd.test +++ b/tests/ioCmd.test @@ -1214,6 +1214,7 @@ test iocmd-24.15 {chan write, EAGAIN means that writing is not allowed at this t error EAGAIN } set c [chan create {r w} foo] + fconfigure $c -blocking 0 } -body { note [puts -nonewline $c ABC ; flush $c] set res @@ -2566,6 +2567,7 @@ test iocmd.tf-24.15 {chan write, EAGAIN means that writing is not allowed at thi error EAGAIN } set c [chan create {r w} foo] + fconfigure $c -blocking 0 } -body { notes [inthread $c { note [puts -nonewline $c ABC ; flush $c] @@ -2593,6 +2595,7 @@ test iocmd.tf-24.16 {chan write, note the background flush setup by close due to error EAGAIN } set c [chan create {r w} foo] + fconfigure $c -blocking 0 } -body { notes [inthread $c { note [puts -nonewline $c ABC ; flush $c] |