diff options
| author | dgp <dgp@users.sourceforge.net> | 2014-05-14 15:09:15 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2014-05-14 15:09:15 (GMT) |
| commit | eccb17258ff58d7e7ecdadd9c25f0d8be6a76ac7 (patch) | |
| tree | 8325d53cdb7a073b3116b955b42591c4e6b261c1 /tests/io.test | |
| parent | 07f07faf4b8c0bfb0ee5602e048c44b40d8a4e42 (diff) | |
| parent | e55ee4d6ccaac2a9d5cf8cf1d76b328068f299ba (diff) | |
| download | tcl-eccb17258ff58d7e7ecdadd9c25f0d8be6a76ac7.zip tcl-eccb17258ff58d7e7ecdadd9c25f0d8be6a76ac7.tar.gz tcl-eccb17258ff58d7e7ecdadd9c25f0d8be6a76ac7.tar.bz2 | |
merge trunk
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 8a8775e..8dd7184 100644 --- a/tests/io.test +++ b/tests/io.test @@ -6861,6 +6861,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 @@ -6875,6 +6876,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 @@ -6889,6 +6891,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 |