diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2011-08-18 12:10:11 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2011-08-18 12:10:11 (GMT) |
| commit | 550a9b023e48189248ee04816b0c01f0f862bad8 (patch) | |
| tree | db4fc39801b7fce8670ddf65f49d5f466976a7c8 /tests/utf.test | |
| parent | a8cbd4663aea70a49bc56c61016e39bebd99eeae (diff) | |
| parent | cb112714d6dc2adff4f7a31b2268de41a0fbb6bd (diff) | |
| download | tcl-550a9b023e48189248ee04816b0c01f0f862bad8.zip tcl-550a9b023e48189248ee04816b0c01f0f862bad8.tar.gz tcl-550a9b023e48189248ee04816b0c01f0f862bad8.tar.bz2 | |
Merge to feature branch
Diffstat (limited to 'tests/utf.test')
| -rw-r--r-- | tests/utf.test | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/tests/utf.test b/tests/utf.test index 81385bb..64b5cd4 100644 --- a/tests/utf.test +++ b/tests/utf.test @@ -259,8 +259,9 @@ test utf-16.1 {Tcl_UniCharToLower, negative delta} { string tolower aA } aa test utf-16.2 {Tcl_UniCharToLower, positive delta} { - string tolower \u0178\u00ff -} \u00ff\u00ff + string tolower \u0178\u00ff\uA78D +} \u00ff\u00ff\u0265 + test utf-17.1 {Tcl_UniCharToLower, no delta} { string tolower ! } ! |