Description: |
(text/x-fossil-wiki)
Test "chan-io-52.11" fails as follows:
<verbatim>
==== chan-io-52.11 TclCopyChannel & encodings FAILED
==== Contents of test case:
# binary to encoding => the input has to be in utf-8 to make sense to the
# encoder
set in [open $path(utf8-fcopy.txt) r]
set out [open $path(kyrillic.txt) w]
# -translation binary is also -encoding binary
chan configure $in -translation binary
chan configure $out -encoding koi8-r -translation lf
chan copy $in $out
chan close $in
chan close $out
file size $path(kyrillic.txt)
---- Result was:
4
---- Result should have been (exact matching):
3
==== chan-io-52.11 FAILED
</verbatim>
for
* tcl 8.6.6rc1
* Platform: Win 10 GER 64 bit
* Compiled by: MS-VC6 + PSDK2003SP1, Makefile.vc
|