summaryrefslogtreecommitdiffstats
path: root/tests/dict.test
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2003-10-06 14:32:22 (GMT)
committerdgp <dgp@users.sourceforge.net>2003-10-06 14:32:22 (GMT)
commit9a9830e9ae1659f50647d28b879f819e2b6a4993 (patch)
tree549421089ef70fa0ac312e7309fbc4fe719a8089 /tests/dict.test
parentee5f778e978b2eeb66266b4314b0952b7a3bbbff (diff)
downloadtcl-9a9830e9ae1659f50647d28b879f819e2b6a4993.zip
tcl-9a9830e9ae1659f50647d28b879f819e2b6a4993.tar.gz
tcl-9a9830e9ae1659f50647d28b879f819e2b6a4993.tar.bz2
* tests/reg.test: Corrected duplicate test names.
* tests/resource.test: [Bugs 710370, 710358] * tests/dict.test: * tests/dict.test: Updated [package require tcltest] lines to * tests/fileSystem.test: indiciate that these test files * tests/lrepeat.test: use features of tcltest 2. [Bug 706114] * tests/notify.test: * tests/parseExpr.test: * tests/unixNotfy.test: * tests/winDde.test:
Diffstat (limited to 'tests/dict.test')
-rw-r--r--tests/dict.test8
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/dict.test b/tests/dict.test
index f9c5c5a..e4d5994 100644
--- a/tests/dict.test
+++ b/tests/dict.test
@@ -9,10 +9,10 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: dict.test,v 1.3 2003/07/24 16:05:24 dgp Exp $
+# RCS: @(#) $Id: dict.test,v 1.4 2003/10/06 14:32:22 dgp Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
- package require tcltest
+ package require tcltest 2
namespace import -force ::tcltest::*
}
@@ -318,7 +318,7 @@ test dict-12.3 {dict lappend command} {
set dictv {a a}
dict lappend dictv a b c
} {a {a b c}}
-test dict-12.2 {dict lappend command} {
+test dict-12.2.1 {dict lappend command} {
set dictv [dict create a [string index =a= 1]]
dict lappend dictv a b
} {a {a b}}
@@ -365,7 +365,7 @@ test dict-13.3 {dict append command} {
set dictv {a a}
dict append dictv a b c
} {a abc}
-test dict-13.2 {dict append command} {
+test dict-13.2.1 {dict append command} {
set dictv [dict create a [string index =a= 1]]
dict append dictv a b
} {a ab}