diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-02-15 07:30:03 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-02-15 07:30:03 (GMT) |
commit | 7fb1760f4248b894ca15c65562800b98c5e08b2e (patch) | |
tree | d55db1b71c886f209039aaeb35cfa3c2f43b7b4e /tests | |
parent | fb260e838200ee3007a853db81e2e9f775ebb783 (diff) | |
parent | 4c2d834fca441a8d463e3bd1a06489f0b864cf73 (diff) | |
download | tcl-7fb1760f4248b894ca15c65562800b98c5e08b2e.zip tcl-7fb1760f4248b894ca15c65562800b98c5e08b2e.tar.gz tcl-7fb1760f4248b894ca15c65562800b98c5e08b2e.tar.bz2 |
Merge 8.7. Test-case only
Diffstat (limited to 'tests')
-rw-r--r-- | tests/encoding.test | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/encoding.test b/tests/encoding.test index aef5028..4cf2e4c 100644 --- a/tests/encoding.test +++ b/tests/encoding.test @@ -528,6 +528,9 @@ test encoding-16.15 {Utf16ToUtfProc} -constraints knownBug -body { test encoding-16.16 {Utf16ToUtfProc} -body { encoding convertfrom utf-16le \x00\xDC\x00\xD8 } -result \uDC00\uD800 +test encoding-16.17 {Utf32ToUtfProc} -body { + list [encoding convertfrom -strict -failindex idx utf-32le \x41\x00\x00\x00\x00\xD8\x00\x00\x42\x00\x00\x00] [set idx] +} -result {A 4} test encoding-16.9 { Utf16ToUtfProc, Tcl_UniCharToUtf, surrogate pairs in utf-16 |