diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2016-07-16 11:42:38 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2016-07-16 11:42:38 (GMT) |
commit | 9015a7b063d96172512c54d84395d2b260d4d330 (patch) | |
tree | 496ba817c4349a54ac3274bcb6e34967dcbbf24e /tests/msgcat.test | |
parent | cbd642eea303b0db3eec81529c27f2045984f22a (diff) | |
download | tcl-9015a7b063d96172512c54d84395d2b260d4d330.zip tcl-9015a7b063d96172512c54d84395d2b260d4d330.tar.gz tcl-9015a7b063d96172512c54d84395d2b260d4d330.tar.bz2 |
[77d58e3a7a] Test case independence: io, load, msgcat, namespace, safe.
Diffstat (limited to 'tests/msgcat.test')
-rw-r--r-- | tests/msgcat.test | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/tests/msgcat.test b/tests/msgcat.test index 8647f9c..ae35272 100644 --- a/tests/msgcat.test +++ b/tests/msgcat.test @@ -68,6 +68,7 @@ namespace eval ::msgcat::test { set result c } } + test msgcat-0.$count [list \ locale initialization from environment variables $setVars \ ] -setup { @@ -973,7 +974,10 @@ namespace eval ::msgcat::test { } set bgerrorsaved [interp bgerror {}] interp bgerror {} [namespace code callbackproc] - + + variable locale + if {![info exist locale]} { set locale [mclocale] } + test msgcat-14.1 {invokation loadcmd} -setup { mcforgetpackage mclocale $locale @@ -1068,7 +1072,7 @@ namespace eval ::msgcat::test { mc k1 } -returnCodes 1\ -result {fail} - + interp bgerror {} $bgerrorsaved cleanupTests @@ -1076,3 +1080,6 @@ namespace eval ::msgcat::test { namespace delete ::msgcat::test return +# Local Variables: +# mode: tcl +# End: |