diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-06-18 07:50:19 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-06-18 07:50:19 (GMT) |
commit | f498e25fe3bf5f45bf480cc450fa0f9e83910d64 (patch) | |
tree | 780a58306503cc1309cf5051bd9f8506aa586400 /tests/utf.test | |
parent | c694b80895cefb1f73e090593b507dfa7f6a213e (diff) | |
parent | 914227b03938ff6da7a4b35ef2e9a2b495df3ba0 (diff) | |
download | tcl-f498e25fe3bf5f45bf480cc450fa0f9e83910d64.zip tcl-f498e25fe3bf5f45bf480cc450fa0f9e83910d64.tar.gz tcl-f498e25fe3bf5f45bf480cc450fa0f9e83910d64.tar.bz2 |
Fix uniClass tool which was the real cause for [a876646efe], and add test-case for it.
Diffstat (limited to 'tests/utf.test')
-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 c41cfe3..ebab967 100644 --- a/tests/utf.test +++ b/tests/utf.test @@ -337,8 +337,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} { |