diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-05-10 16:03:13 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-05-10 16:03:13 (GMT) |
| commit | 08df07894566ad1a3cf2dc750ab9322761ee400f (patch) | |
| tree | 620e18d988e661349d957eb09da1777d21f4b2f9 /tests/utf.test | |
| parent | 20baf86d1e03655bb6d7fae562091e95fe52db15 (diff) | |
| parent | 313d238fb894ff0775f40ec5aee77627742a3b1b (diff) | |
| download | tcl-dgp_dup_encoding_fix.zip tcl-dgp_dup_encoding_fix.tar.gz tcl-dgp_dup_encoding_fix.tar.bz2 | |
merge trunkdgp_dup_encoding_fix
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 ceb1af7..a03dd6c 100644 --- a/tests/utf.test +++ b/tests/utf.test @@ -302,7 +302,7 @@ test utf-21.1 {TclUniCharIsAlnum} { } {1} test utf-21.2 {unicode alnum char in regc_locale.c} { # this returns 1 with Unicode 7 compliance - list [regexp {^[[:alnum:]]+$} \u1040\u021f\u0220] [regexp {^\w+$} \u1040\u021f\u0220] + list [regexp {^[[:alnum:]]+$} \u1040\u021f\u0220] [regexp {^\w+$} \u1040\u021f\u0220_\u203f\u2040\u2054\ufe33\ufe34\ufe4d\ufe4e\ufe4f\uff3f] } {1 1} test utf-21.3 {unicode print char in regc_locale.c} { # this returns 1 with Unicode 7 compliance |