diff options
| author | dgp <dgp@users.sourceforge.net> | 2020-05-07 16:44:08 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2020-05-07 16:44:08 (GMT) |
| commit | a905663fb19b096859fa15ee42a2793745189767 (patch) | |
| tree | d2e394d97eb650bb27d81bf10652bb37c91331ac | |
| parent | fe1e0d3a739a202d07a7f2034438c79b453a76db (diff) | |
| parent | 13faf8b1d4ae63413f8d1c301c422aeab3eb977b (diff) | |
| download | tcl-a905663fb19b096859fa15ee42a2793745189767.zip tcl-a905663fb19b096859fa15ee42a2793745189767.tar.gz tcl-a905663fb19b096859fa15ee42a2793745189767.tar.bz2 | |
merge 8.6
| -rw-r--r-- | tests/utf.test | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/tests/utf.test b/tests/utf.test index 58c0251..7b6bf1c 100644 --- a/tests/utf.test +++ b/tests/utf.test @@ -468,7 +468,7 @@ test utf-6.85 {Tcl_UtfNext - overlong sequences} {testutfnext testbytestring} { test utf-6.86 {Tcl_UtfNext - overlong sequences} {testutfnext testbytestring} { testutfnext [testbytestring \xF0\x80\x80\x80] } 1 -test utf-6.87.0 {Tcl_UtfNext - overlong sequences} {testutfnext testbytestring ucs2_utf16 } { +test utf-6.87.0 {Tcl_UtfNext - overlong sequences} {testutfnext testbytestring ucs2_utf16} { testutfnext [testbytestring \xF0\x90\x80\x80] } 1 test utf-6.87.1 {Tcl_UtfNext - overlong sequences} {testutfnext testbytestring ucs4} { @@ -739,10 +739,16 @@ test utf-7.14.1 {Tcl_UtfPrev} {testutfprev testbytestring} { test utf-7.14.2 {Tcl_UtfPrev} {testutfprev testbytestring} { testutfprev A[testbytestring \xF8\xA0\xA0\xF8] 4 } 3 -test utf-7.15 {Tcl_UtfPrev} {testutfprev testbytestring ucs2_utf16} { +test utf-7.15.0 {Tcl_UtfPrev} {testutfprev testbytestring ucs2_utf16} { testutfprev A[testbytestring \xF2\xA0\xA0] } 3 test utf-7.15.1 {Tcl_UtfPrev} {testutfprev testbytestring ucs4} { + testutfprev A[testbytestring \xF2\xA0\xA0] +} 1 +test utf-7.15.1.0 {Tcl_UtfPrev} {testutfprev testbytestring ucs2_utf16} { + testutfprev A[testbytestring \xF2\xA0\xA0\xA0] 4 +} 3 +test utf-7.15.1.1 {Tcl_UtfPrev} {testutfprev testbytestring ucs4} { testutfprev A[testbytestring \xF2\xA0\xA0\xA0] 4 } 1 test utf-7.15.2.0 {Tcl_UtfPrev} {testutfprev testbytestring ucs2_utf16} { |