summaryrefslogtreecommitdiffstats
path: root/tests/io.test
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2015-04-30 15:31:42 (GMT)
committerdgp <dgp@users.sourceforge.net>2015-04-30 15:31:42 (GMT)
commit76caae45f6017bfb0bb12a45f978e3d24b0dcfa5 (patch)
tree7178732d83003dff66dc871c941f5f5bbbf24d0a /tests/io.test
parentad9a6bc3ee2c6ad54714dc0da96ba7cfbc0b8556 (diff)
parentd83d89d362d25757894f30114918b084c6b14305 (diff)
downloadtcl-76caae45f6017bfb0bb12a45f978e3d24b0dcfa5.zip
tcl-76caae45f6017bfb0bb12a45f978e3d24b0dcfa5.tar.gz
tcl-76caae45f6017bfb0bb12a45f978e3d24b0dcfa5.tar.bz2
test portability
Diffstat (limited to 'tests/io.test')
-rw-r--r--tests/io.test3
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/io.test b/tests/io.test
index dc98001..6b6ad6d 100644
--- a/tests/io.test
+++ b/tests/io.test
@@ -7409,6 +7409,7 @@ test io-53.4.1 {Bug 894da183c8} {stdio fcopy} {
puts $f1 {
puts ready
set f [open io-53.4.1 w]
+ chan configure $f -translation lf
fcopy stdin $f -command { set x }
vwait x
close $f
@@ -7417,7 +7418,7 @@ test io-53.4.1 {Bug 894da183c8} {stdio fcopy} {
close $f1
set f1 [open "|[list [interpreter] $path(pipe)]" r+]
set result [gets $f1]
- fconfigure $f1 -blocking 0 -buffersize 125000
+ fconfigure $f1 -blocking 0 -buffersize 125000 -translation lf
puts $f1 $big
fconfigure $f1 -blocking 1
close $f1