diff options
| author | dgp <dgp@users.sourceforge.net> | 2014-05-14 14:52:42 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2014-05-14 14:52:42 (GMT) |
| commit | f57343eb4231250a40714497a2d60b03d891f08f (patch) | |
| tree | 2dbac48e436475a22e768ea7bae155275ca972c3 /tests/io.test | |
| parent | 63543e9ad0130ddeba54d3a9f97d49e4c7216189 (diff) | |
| parent | 2e71d669fe81b7911acde1deb7df892f531d1c8d (diff) | |
| download | tcl-f57343eb4231250a40714497a2d60b03d891f08f.zip tcl-f57343eb4231250a40714497a2d60b03d891f08f.tar.gz tcl-f57343eb4231250a40714497a2d60b03d891f08f.tar.bz2 | |
merge 8.5
Diffstat (limited to 'tests/io.test')
| -rw-r--r-- | tests/io.test | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/io.test b/tests/io.test index d9f133c..cc3730d 100644 --- a/tests/io.test +++ b/tests/io.test @@ -6837,6 +6837,7 @@ test io-52.12 {coverage of -translation auto} { set in [open $path(test1)] chan configure $in -buffersize 8 set out [open $path(test2) w] + chan configure $out -translation lf fcopy $in $out close $in close $out @@ -6851,6 +6852,7 @@ test io-52.13 {coverage of -translation cr} { set in [open $path(test1)] chan configure $in -buffersize 8 -translation cr set out [open $path(test2) w] + chan configure $out -translation lf fcopy $in $out close $in close $out @@ -6865,6 +6867,7 @@ test io-52.14 {coverage of -translation crlf} { set in [open $path(test1)] chan configure $in -buffersize 8 -translation crlf set out [open $path(test2) w] + chan configure $out -translation lf fcopy $in $out close $in close $out |