summaryrefslogtreecommitdiffstats
path: root/tests/utf.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2013-06-18 07:50:19 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2013-06-18 07:50:19 (GMT)
commit76df95e6e49c926b2b3f71f8b740221e897a7643 (patch)
tree780a58306503cc1309cf5051bd9f8506aa586400 /tests/utf.test
parent6a445a3fe6adfa02cd82df0fa30d3118b4032441 (diff)
parent7243b34d8035e8705d690339b6005161c9edbd8d (diff)
downloadtcl-76df95e6e49c926b2b3f71f8b740221e897a7643.zip
tcl-76df95e6e49c926b2b3f71f8b740221e897a7643.tar.gz
tcl-76df95e6e49c926b2b3f71f8b740221e897a7643.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.test4
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} {