diff options
| author | apnadkarni <apnmbx-wits@yahoo.com> | 2023-12-05 13:09:22 (GMT) |
|---|---|---|
| committer | apnadkarni <apnmbx-wits@yahoo.com> | 2023-12-05 13:09:22 (GMT) |
| commit | b844b819dc474968b15fb4c891ded3fd57ea1184 (patch) | |
| tree | 68109cce3ca25f1913eb3c1327987051ba624a82 | |
| parent | ec111e454d8d0c27ae09daa327636732a5c35164 (diff) | |
| download | tcl-b844b819dc474968b15fb4c891ded3fd57ea1184.zip tcl-b844b819dc474968b15fb4c891ded3fd57ea1184.tar.gz tcl-b844b819dc474968b15fb4c891ded3fd57ea1184.tar.bz2 | |
Test case for bug
| -rw-r--r-- | tests/exec.test | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/tests/exec.test b/tests/exec.test index 5a640b0..7f40a38 100644 --- a/tests/exec.test +++ b/tests/exec.test @@ -712,6 +712,22 @@ test exec-20.1 {exec .CMD file} -constraints {win} -body { exec [makeFile "echo %1> $log" exec201.CMD] "Testing exec-20.1" viewFile $log } -result "\"Testing exec-20.1\"" + +# Test with encoding mismatches (Bug 0f1ddc0df7fb7) +test exec-21.1 {exec encoding mismatch} -setup { + set path(script) [makeFile { + fconfigure stdout -translation binary + puts a\xe9b + } script] + set enc [encoding system] + encoding system utf-8 +} -cleanup { + removeFile $path(script) + encoding system $enc +} -body { + exec [info nameofexecutable] $path(script) +} -result a\uFFFDb + # ---------------------------------------------------------------------- # cleanup |
