summaryrefslogtreecommitdiffstats
path: root/tests/encoding.test
diff options
context:
space:
mode:
authorapnadkarni <apnmbx-wits@yahoo.com>2023-06-29 11:09:29 (GMT)
committerapnadkarni <apnmbx-wits@yahoo.com>2023-06-29 11:09:29 (GMT)
commit6ae93efff085e5d96d7e8e658ab64992e9e1191b (patch)
tree4377796fbbb44af185109ab146fa1fe8dec820e9 /tests/encoding.test
parentb95bc2b4ce35527780a8ac02d2b070a3c3bdfa2a (diff)
downloadtcl-6ae93efff085e5d96d7e8e658ab64992e9e1191b.zip
tcl-6ae93efff085e5d96d7e8e658ab64992e9e1191b.tar.gz
tcl-6ae93efff085e5d96d7e8e658ab64992e9e1191b.tar.bz2
Bug [6a3e2cb0f0] - invalid bytes in escape encodings
Diffstat (limited to 'tests/encoding.test')
-rw-r--r--tests/encoding.test9
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/encoding.test b/tests/encoding.test
index c404eb0..4abc10e 100644
--- a/tests/encoding.test
+++ b/tests/encoding.test
@@ -1109,6 +1109,15 @@ test encoding-29.0 {get encoding nul terminator lengths} -constraints {
[testencoding nullength ksc5601]
} -result {1 2 4 2 2}
+test encoding-bug-6a3e2cb0f0-1 {Bug [6a3e2cb0f0] - invalid bytes in escape encodings} -body {
+ encoding convertfrom -profile tcl8 iso2022-jp x\x1b\x7aaby
+} -result x\uFFFDy
+test encoding-bug-6a3e2cb0f0-2 {Bug [6a3e2cb0f0] - invalid bytes in escape encodings} -body {
+ encoding convertfrom -profile strict iso2022-jp x\x1b\x7aaby
+} -returnCodes error -result {unexpected byte sequence starting at index 1: '\x1B'}
+test encoding-bug-6a3e2cb0f0-3 {Bug [6a3e2cb0f0] - invalid bytes in escape encodings} -body {
+ encoding convertfrom -profile replace iso2022-jp x\x1b\x7aaby
+} -result x\uFFFDy
# cleanup
namespace delete ::tcl::test::encoding