summaryrefslogtreecommitdiffstats
path: root/tests/utf.test
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2020-05-07 20:50:55 (GMT)
committerdgp <dgp@users.sourceforge.net>2020-05-07 20:50:55 (GMT)
commit098e262372efb9e7d7ac9e3f58bf30febfbaf8bd (patch)
treec95065e047b30caf6565322fa7127ee0f339242c /tests/utf.test
parent1a4f2bb690f881a94a9bd1247ce7b00079e829e2 (diff)
parent6d3523c5c610db0509a1e1484163de4651b10c4d (diff)
downloadtcl-098e262372efb9e7d7ac9e3f58bf30febfbaf8bd.zip
tcl-098e262372efb9e7d7ac9e3f58bf30febfbaf8bd.tar.gz
tcl-098e262372efb9e7d7ac9e3f58bf30febfbaf8bd.tar.bz2
close fork
Diffstat (limited to 'tests/utf.test')
-rw-r--r--tests/utf.test10
1 files changed, 5 insertions, 5 deletions
diff --git a/tests/utf.test b/tests/utf.test
index b8839c0..a9534f2 100644
--- a/tests/utf.test
+++ b/tests/utf.test
@@ -190,15 +190,15 @@ test utf-5.2 {Tcl_UtfFindLast} {testfindlast testbytestring} {
testfindlast [testbytestring abcbc] 98
} bc
-test utf-6.1 {Tcl_UtfNext} {testutfnext testbytestring} {
+test utf-6.1 {Tcl_UtfNext} testutfnext {
# This takes the pointer one past the terminating NUL.
# This is really an invalid call.
testutfnext {}
} 1
-test utf-6.2 {Tcl_UtfNext} {testutfnext testbytestring} {
+test utf-6.2 {Tcl_UtfNext} testutfnext {
testutfnext A
} 1
-test utf-6.3 {Tcl_UtfNext} {testutfnext testbytestring} {
+test utf-6.3 {Tcl_UtfNext} testutfnext {
testutfnext AA
} 1
test utf-6.4 {Tcl_UtfNext} {testutfnext testbytestring} {
@@ -450,7 +450,7 @@ test utf-6.79.0 {Tcl_UtfNext} {testutfnext testbytestring ucs2_utf16} {
test utf-6.79.1 {Tcl_UtfNext} {testutfnext testbytestring ucs4} {
testutfnext [testbytestring \xF2\xA0\xA0\xA0G\xF8]
} 4
-test utf-6.80 {Tcl_UtfNext - overlong sequences} {testutfnext} {
+test utf-6.80 {Tcl_UtfNext - overlong sequences} testutfnext {
testutfnext \x00
} 2
test utf-6.81 {Tcl_UtfNext - overlong sequences} {testutfnext testbytestring} {
@@ -934,7 +934,7 @@ test utf-7.46.1 {Tcl_UtfPrev -- no lead byte at start} {testutfprev testbytestr
test utf-7.47 {Tcl_UtfPrev, pointing to 3th byte of 3-byte valid sequence} {testutfprev testbytestring} {
testutfprev [testbytestring \xE8\xA0]
} 0
-test utf-7.47.1 {Tcl_UtfPrev, pointing to 3th byte of 3-byte valid sequence} {testutfprev testbytestring} {
+test utf-7.47.1 {Tcl_UtfPrev, pointing to 3th byte of 3-byte valid sequence} testutfprev {
testutfprev \u8820 2
} 0
test utf-7.47.2 {Tcl_UtfPrev, pointing to 3th byte of 3-byte invalid sequence} {testutfprev testbytestring} {