diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-06-18 07:43:59 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-06-18 07:43:59 (GMT) |
| commit | 914227b03938ff6da7a4b35ef2e9a2b495df3ba0 (patch) | |
| tree | badfd30dee7ef1a7a95dabf3bee8cc225367e523 /tests | |
| parent | 5298476c8a9dce4f5b1e2519220df640ba3c7046 (diff) | |
| download | tcl-914227b03938ff6da7a4b35ef2e9a2b495df3ba0.zip tcl-914227b03938ff6da7a4b35ef2e9a2b495df3ba0.tar.gz tcl-914227b03938ff6da7a4b35ef2e9a2b495df3ba0.tar.bz2 | |
Fix uniClass tool which was the real cause for [a876646efe], and add test-case for it.
Diffstat (limited to 'tests')
| -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 ad1e7b8..35c5f73 100644 --- a/tests/utf.test +++ b/tests/utf.test @@ -322,8 +322,8 @@ test utf-21.11 {TclUniCharIsControl} { string is control \u00ad } {1} test utf-21.12 {unicode control char in regc_locale.c} { - # [Bug 3464428] - regexp {^[[:cntrl:]]$} \u00ad + # [Bug 3464428], [Bug a876646efe] + regexp {^[[:cntrl:]]*$} \u0000\u001f\u00ad } {1} test utf-22.1 {TclUniCharIsWordChar} { |