summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2014-08-22 13:48:50 (GMT)
committerdgp <dgp@users.sourceforge.net>2014-08-22 13:48:50 (GMT)
commit2b50c1447fc0d201d7afada548a16fc6cf6645ae (patch)
tree3463f73047f7b5a5451b8b7e40a7dc606997f8bf /tests
parent08a0a8c4a05e9a2915604e90ec54b27426677f9b (diff)
parent7b2b44f56169a915474820a5d7ed5dad0016c1c2 (diff)
downloadtcl-2b50c1447fc0d201d7afada548a16fc6cf6645ae.zip
tcl-2b50c1447fc0d201d7afada548a16fc6cf6645ae.tar.gz
tcl-2b50c1447fc0d201d7afada548a16fc6cf6645ae.tar.bz2
merge 8.5; fix notifier mask bug and Tcl_Read performance regression
Diffstat (limited to 'tests')
-rw-r--r--tests/io.test5
1 files changed, 4 insertions, 1 deletions
diff --git a/tests/io.test b/tests/io.test
index cef3e81..639691a 100644
--- a/tests/io.test
+++ b/tests/io.test
@@ -4950,7 +4950,10 @@ test io-36.1 {Tcl_InputBlocked on nonblocking pipe} {stdio openpipe} {
test io-36.1.1 {Tcl_InputBlocked on nonblocking binary pipe} {stdio openpipe} {
set f1 [open "|[list [interpreter]]" r+]
chan configure $f1 -encoding binary -translation lf -eofchar {}
- puts $f1 {puts hello_from_pipe}
+ puts $f1 {
+ chan configure stdout -encoding binary -translation lf -eofchar {}
+ puts hello_from_pipe
+ }
flush $f1
gets $f1
fconfigure $f1 -blocking off -buffering full