diff options
| author | dgp <dgp@users.sourceforge.net> | 2013-01-30 20:42:10 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2013-01-30 20:42:10 (GMT) |
| commit | 4445787a0a5228ad9d533415e563d6ae0ec517bf (patch) | |
| tree | fe7cda3c3a7c230ce8087e0d21f017d6aa73dd97 /tests/assocd.test | |
| parent | 6a27aae72c76f68c63aa85b9bc8f159385534102 (diff) | |
| download | tcl-4445787a0a5228ad9d533415e563d6ae0ec517bf.zip tcl-4445787a0a5228ad9d533415e563d6ae0ec517bf.tar.gz tcl-4445787a0a5228ad9d533415e563d6ae0ec517bf.tar.bz2 | |
For Parse/eval, select modernizations from Patrick Fradin.
Diffstat (limited to 'tests/assocd.test')
| -rw-r--r-- | tests/assocd.test | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/tests/assocd.test b/tests/assocd.test index 1ca1c9b..f07d466 100644 --- a/tests/assocd.test +++ b/tests/assocd.test @@ -11,10 +11,8 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. -if {[lsearch [namespace children] ::tcltest] == -1} { - package require tcltest - namespace import -force ::tcltest::* -} +package require tcltest 2 +namespace import ::tcltest::* testConstraint testgetassocdata [llength [info commands testgetassocdata]] testConstraint testsetassocdata [llength [info commands testsetassocdata]] @@ -57,5 +55,5 @@ test assocd-3.3 {testing deleting assoc data} testdelassocdata { } {0 {}} # cleanup -::tcltest::cleanupTests +cleanupTests return |