summaryrefslogtreecommitdiffstats
path: root/tests/utf.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2017-11-07 13:19:37 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2017-11-07 13:19:37 (GMT)
commitac4fb39a73fb01e2cbb763a086191aa4fcec175f (patch)
treefb67aa926db34edee816329713636b53a64927df /tests/utf.test
parent5528e1c1a25f45988be72e2e16ff577f0dbb1abd (diff)
downloadtcl-ac4fb39a73fb01e2cbb763a086191aa4fcec175f.zip
tcl-ac4fb39a73fb01e2cbb763a086191aa4fcec175f.tar.gz
tcl-ac4fb39a73fb01e2cbb763a086191aa4fcec175f.tar.bz2
Don't use Unicode character \udead in test-cases, because it is an invalid Unicode code-point (lower surrogate). This will cause test-failures with TIP #389. Just use \ud0ad in stead. Also fix some other test-cases which fail for TCL_UTF_MAX == 4.
Diffstat (limited to 'tests/utf.test')
-rw-r--r--tests/utf.test4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/utf.test b/tests/utf.test
index 422ab08..45f9c0c 100644
--- a/tests/utf.test
+++ b/tests/utf.test
@@ -68,10 +68,10 @@ test utf-2.7 {Tcl_UtfToUniChar: lead (3-byte) followed by 2 trail} testbytestrin
} {1}
test utf-2.8 {Tcl_UtfToUniChar: lead (4-byte) followed by 3 trail} -constraints {fullutf testbytestring} -body {
string length [testbytestring "\xF0\x90\x80\x80"]
-} -result {1}
+} -result {2}
test utf-2.9 {Tcl_UtfToUniChar: lead (4-byte) followed by 3 trail} -constraints {fullutf testbytestring} -body {
string length [testbytestring "\xF4\x8F\xBF\xBF"]
-} -result {1}
+} -result {2}
test utf-2.10 {Tcl_UtfToUniChar: lead (4-byte) followed by 3 trail, underflow} testbytestring {
string length [testbytestring "\xF0\x8F\xBF\xBF"]
} {4}