diff options
author | dgp <dgp@users.sourceforge.net> | 2014-10-10 20:37:58 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2014-10-10 20:37:58 (GMT) |
commit | ceff856085045650b5b10e2d2fea1355ba78e4c4 (patch) | |
tree | d2d595f7a8cbf28ddc9fc536754efccf285b802c /tests/utf.test | |
parent | 0b2fd8fa683af75eea9927ad65f7c7d4a9836163 (diff) | |
download | tcl-ceff856085045650b5b10e2d2fea1355ba78e4c4.zip tcl-ceff856085045650b5b10e2d2fea1355ba78e4c4.tar.gz tcl-ceff856085045650b5b10e2d2fea1355ba78e4c4.tar.bz2 |
Resolve test conflicts over global vars
Diffstat (limited to 'tests/utf.test')
-rw-r--r-- | tests/utf.test | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/tests/utf.test b/tests/utf.test index 2fcac49..83daddf 100644 --- a/tests/utf.test +++ b/tests/utf.test @@ -287,9 +287,11 @@ test utf-18.5 {Tcl_UniCharToTitle, no delta} { string totitle ! } ! -test utf-19.1 {TclUniCharLen} { +test utf-19.1 {TclUniCharLen} -body { list [regexp \\d abc456def foo] $foo -} {1 4} +} -cleanup { + unset -nocomplain foo +} -result {1 4} test utf-20.1 {TclUniCharNcmp} { } {} |