summaryrefslogtreecommitdiffstats
path: root/tests/encoding.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-12-16 09:50:33 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-12-16 09:50:33 (GMT)
commit4cca4b0b1c3095ef64a4c8fa816dd27d52c4bdff (patch)
tree752997977f3afb408d13de2db3137cd3734de221 /tests/encoding.test
parenta06b13bb4aab729b83c704578bc69e280e6071f3 (diff)
parentedee881fb26816194a320932f55e095b077d0e94 (diff)
downloadtcl-4cca4b0b1c3095ef64a4c8fa816dd27d52c4bdff.zip
tcl-4cca4b0b1c3095ef64a4c8fa816dd27d52c4bdff.tar.gz
tcl-4cca4b0b1c3095ef64a4c8fa816dd27d52c4bdff.tar.bz2
Merge 8.7
Diffstat (limited to 'tests/encoding.test')
-rw-r--r--tests/encoding.test10
1 files changed, 8 insertions, 2 deletions
diff --git a/tests/encoding.test b/tests/encoding.test
index 89209d0..24d9c82 100644
--- a/tests/encoding.test
+++ b/tests/encoding.test
@@ -491,16 +491,22 @@ test encoding-17.2 {UtfToUcs2Proc} -body {
} -result "\uFFFD"
test encoding-17.3 {UtfToUtf16Proc} -body {
encoding convertto -nocomplain utf-16be "\uDCDC"
-} -result "\xFF\xFD"
+} -result "\xDC\xDC"
test encoding-17.4 {UtfToUtf16Proc} -body {
encoding convertto -nocomplain utf-16le "\uD8D8"
-} -result "\xFD\xFF"
+} -result "\xD8\xD8"
test encoding-17.5 {UtfToUtf16Proc} -body {
encoding convertto utf-32le "\U460DC"
} -result "\xDC\x60\x04\x00"
test encoding-17.6 {UtfToUtf16Proc} -body {
encoding convertto utf-32be "\U460DC"
} -result "\x00\x04\x60\xDC"
+test encoding-17.7 {UtfToUtf16Proc} -body {
+ encoding convertto -strict utf-16be "\uDCDC"
+} -returnCodes error -result {unexpected character at index 0: 'U+00DCDC'}
+test encoding-17.8 {UtfToUtf16Proc} -body {
+ encoding convertto -strict utf-16le "\uD8D8"
+} -returnCodes error -result {unexpected character at index 0: 'U+00D8D8'}
test encoding-18.1 {TableToUtfProc} {
} {}