diff options
| author | dgp <dgp@users.sourceforge.net> | 2020-04-30 20:55:50 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2020-04-30 20:55:50 (GMT) |
| commit | 58ce7d319f84db00c8863a8a27d366a34e60756c (patch) | |
| tree | d69ff00af0624c707801c026b6808ca56e1ecb43 /tests/utf.test | |
| parent | 2414411935e501e37c25ceeea273e5bcdc837fbb (diff) | |
| download | tcl-58ce7d319f84db00c8863a8a27d366a34e60756c.zip tcl-58ce7d319f84db00c8863a8a27d366a34e60756c.tar.gz tcl-58ce7d319f84db00c8863a8a27d366a34e60756c.tar.bz2 | |
D'oh!
Diffstat (limited to 'tests/utf.test')
| -rw-r--r-- | tests/utf.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/utf.test b/tests/utf.test index a00f89d..7fc1de0 100644 --- a/tests/utf.test +++ b/tests/utf.test @@ -1329,7 +1329,7 @@ test utf-20.1 {TclUniCharNcmp} {ucs4} { } -1 test utf-20.2 {[4c591fa487] TclUniCharNcmp/TclUtfNcmp} { 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 |