diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2011-08-18 11:31:21 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2011-08-18 11:31:21 (GMT) |
| commit | 135891c9a942377b0c1a407a865ad167d1c248fb (patch) | |
| tree | 0a66df2cb2c1ccd849d7a08e50fe9cae4107472d /tests/utf.test | |
| parent | c3c5a8b1faabc2f4bb00c558570e2bd7fd85a4b5 (diff) | |
| parent | ab6c3373709490cffb5dc59491cc76c5969ca3ec (diff) | |
| download | tcl-135891c9a942377b0c1a407a865ad167d1c248fb.zip tcl-135891c9a942377b0c1a407a865ad167d1c248fb.tar.gz tcl-135891c9a942377b0c1a407a865ad167d1c248fb.tar.bz2 | |
[Bug 3393714] overflow in toupper delta
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 92b3a48..3bf7b06 100644 --- a/tests/utf.test +++ b/tests/utf.test @@ -247,8 +247,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 ! } ! |