diff options
author | dgp <dgp@users.sourceforge.net> | 2020-04-30 20:57:05 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2020-04-30 20:57:05 (GMT) |
commit | ba28f4892362a62309d8809b4dc5099a888a9f91 (patch) | |
tree | c4b7ef05790d0fbf40906283aa4d3dd20cc8b011 /tests/utf.test | |
parent | a2b8761c73e0286e9a05df5dd0ceb625d985b2c5 (diff) | |
parent | 58ce7d319f84db00c8863a8a27d366a34e60756c (diff) | |
download | tcl-ba28f4892362a62309d8809b4dc5099a888a9f91.zip tcl-ba28f4892362a62309d8809b4dc5099a888a9f91.tar.gz tcl-ba28f4892362a62309d8809b4dc5099a888a9f91.tar.bz2 |
merge 8.5
Diffstat (limited to 'tests/utf.test')
-rw-r--r-- | tests/utf.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/utf.test b/tests/utf.test index 2488d8b..0929801 100644 --- a/tests/utf.test +++ b/tests/utf.test @@ -1339,9 +1339,9 @@ test utf-19.1 {TclUniCharLen} -body { test utf-20.1 {TclUniCharNcmp} {ucs4} { string compare [string range [format %c 0xFFFF] 0 0] [string range [format %c 0x10000] 0 0] } -1 -test utf-20.2 {[4c591fa487] TclUniCharNcmp/TclUtfNcmp} { +test utf-20.2 {[4c591fa487] TclUniCharNcmp/TclUtfNcmp} knownBug { set one [format %c 0xFFFF] - set two [format %c 0xFFFF] + set two [format %c 0x10000] set first [string compare $one $two] string range $one 0 0 string range $two 0 0 |