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 | ef89704696f7ce48c9e84dff959c72e2fd887959 (patch) | |
| tree | d2d595f7a8cbf28ddc9fc536754efccf285b802c /tests/utf.test | |
| parent | c132978e4ba0311040a046406bc312fdbe3f9315 (diff) | |
| download | tcl-ef89704696f7ce48c9e84dff959c72e2fd887959.zip tcl-ef89704696f7ce48c9e84dff959c72e2fd887959.tar.gz tcl-ef89704696f7ce48c9e84dff959c72e2fd887959.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} { } {} |