summaryrefslogtreecommitdiffstats
path: root/tests/encoding.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-16 10:00:26 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2023-03-16 10:00:26 (GMT)
commit93ce80a91680899c039e65bf1c00d24045619bd9 (patch)
tree4dbe1c2a544015530d1e8bdba57d6da99fd40e78 /tests/encoding.test
parent4d978a00ede12fc08aeddf81f4c936d533f7c9f3 (diff)
downloadtcl-93ce80a91680899c039e65bf1c00d24045619bd9.zip
tcl-93ce80a91680899c039e65bf1c00d24045619bd9.tar.gz
tcl-93ce80a91680899c039e65bf1c00d24045619bd9.tar.bz2
unicode -> utf-16. Remove some unneeded encodingProfileTodo constraints
Diffstat (limited to 'tests/encoding.test')
-rw-r--r--tests/encoding.test12
1 files changed, 1 insertions, 11 deletions
diff --git a/tests/encoding.test b/tests/encoding.test
index 5224225..407bd28 100644
--- a/tests/encoding.test
+++ b/tests/encoding.test
@@ -514,8 +514,6 @@ test encoding-16.7 {Utf32ToUtfProc} -body {
test encoding-16.8 {Utf32ToUtfProc} -body {
set val [encoding convertfrom -profile tcl8 utf-32 \x41\x00\x00\x41]
list $val [format %x [scan $val %c]]
-} -constraints {
- encodingProfileTodo
} -result "\uFFFD fffd"
test encoding-16.9 {Utf32ToUtfProc} -constraints utf32 -body {
encoding convertfrom utf-32le \x00\xD8\x00\x00
@@ -625,8 +623,6 @@ test encoding-17.12 {Utf32ToUtfProc} -body {
test encoding-18.1 {TableToUtfProc on invalid input} -body {
list [catch {encoding convertto jis0208 \\} res] $res
-} -constraints {
- encodingProfileTodo
} -result {1 {unexpected character at index 0: 'U+00005C'}}
test encoding-18.2 {TableToUtfProc on invalid input with -profile strict} -body {
list [catch {encoding convertto -profile strict jis0208 \\} res] $res
@@ -816,8 +812,6 @@ test encoding-24.18 {Parse valid or invalid utf-8} -constraints testbytestring -
} -result "Z\xC3\xA0\xE2\x82\xACxxxxxx"
test encoding-24.19 {Parse valid or invalid utf-8} -body {
encoding convertto utf-8 "ZX\uD800"
-} -constraints {
- encodingProfileTodo
} -returnCodes 1 -match glob -result "unexpected character at index 2: 'U+00D800'"
test encoding-24.20 {Parse with -profile tcl8 but without providing encoding} -body {
encoding convertfrom -profile tcl8 "\x20"
@@ -875,8 +869,6 @@ test encoding-24.37 {Parse invalid utf-8 with -profile tcl8} -body {
} -result \uD800
test encoding-24.38 {Try to generate invalid utf-8} -body {
encoding convertto utf-8 \uD800
-} -constraints {
- encodingProfileTodo
} -returnCodes 1 -result {unexpected character at index 0: 'U+00D800'}
test encoding-24.39 {Try to generate invalid utf-8 with -profile strict} -body {
encoding convertto -profile strict utf-8 \uD800
@@ -1096,9 +1088,7 @@ test encoding-bug-183a1adcc0-4 {Bug [183a1adcc0] Buffer overflow Tcl_UtfToExtern
} -result [list 0 [list nospace {} \x00\x00\xff]]
test encoding-bug-183a1adcc0-5 {Bug [183a1adcc0] Buffer overflow Tcl_UtfToExternal} -constraints {
- testencoding
-} -constraints {
- knownBug
+ testencoding ucs2 knownBug
} -body {
# The knownBug constraint is because test depends on TCL_UTF_MAX and
# also UtfToUtf16 assumes space required in destination buffer is