summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorferrieux <ferrieux@users.sourceforge.net>2012-05-02 21:15:20 (GMT)
committerferrieux <ferrieux@users.sourceforge.net>2012-05-02 21:15:20 (GMT)
commit4d4bf76067435ab8ee023cd79d453fcb9aafcef9 (patch)
treed5ede0587201812901dd89f73ceaca699d7c764b
parent76c81b20b6039773ba19982279d04dbf2306cc68 (diff)
downloadtcl-4d4bf76067435ab8ee023cd79d453fcb9aafcef9.zip
tcl-4d4bf76067435ab8ee023cd79d453fcb9aafcef9.tar.gz
tcl-4d4bf76067435ab8ee023cd79d453fcb9aafcef9.tar.bz2
Explicitly declare a channel nonblocking before throwing EAGAIN on write.bug_3522560
-rw-r--r--tests/ioCmd.test3
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]