diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-12 16:23:33 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-12 16:23:33 (GMT) |
| commit | aee8588fbcee145de5cf3012f7c0c60277fb5394 (patch) | |
| tree | 021c3a01beb1f2ae18868a339ed7b1310cf2b624 /tests/encoding.test | |
| parent | eeee744ee2f72edd36c45a3ee07dbbee39f16994 (diff) | |
| download | tcl-aee8588fbcee145de5cf3012f7c0c60277fb5394.zip tcl-aee8588fbcee145de5cf3012f7c0c60277fb5394.tar.gz tcl-aee8588fbcee145de5cf3012f7c0c60277fb5394.tar.bz2 | |
2 more testcases, proving utf-32 handling of surrogates (actually: not handling!) is OK
Diffstat (limited to 'tests/encoding.test')
| -rw-r--r-- | tests/encoding.test | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/encoding.test b/tests/encoding.test index c8f34ba..5e8d3f7 100644 --- a/tests/encoding.test +++ b/tests/encoding.test @@ -606,6 +606,12 @@ test encoding-17.9 {Utf32ToUtfProc} -body { test encoding-17.10 {Utf32ToUtfProc} -body { encoding convertfrom -nocomplain utf-32 "\xFF\xFF\xFF\xFF" } -result \uFFFD +test encoding-17.11 {Utf32ToUtfProc} -body { + encoding convertfrom -strict utf-32le "\x00\xD8\x00\x00" +} -returnCodes error -result {unexpected byte sequence starting at index 0: '\x00'} +test encoding-17.12 {Utf32ToUtfProc} -body { + encoding convertfrom -strict utf-32le "\x00\xDC\x00\x00" +} -returnCodes error -result {unexpected byte sequence starting at index 0: '\x00'} test encoding-18.1 {TableToUtfProc on invalid input} -body { list [catch {encoding convertto jis0208 \\} res] $res |