summaryrefslogtreecommitdiffstats
path: root/tests/dict.test
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2007-11-22 22:16:06 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2007-11-22 22:16:06 (GMT)
commit992b51fc822addcd91ae1ea44e0df3486e654c3d (patch)
tree86a28dd4bf00d016c19744f430376f68f2d0009a /tests/dict.test
parent14a34c4087e1034699a9b588da8b0a9927479f45 (diff)
downloadtcl-992b51fc822addcd91ae1ea44e0df3486e654c3d.zip
tcl-992b51fc822addcd91ae1ea44e0df3486e654c3d.tar.gz
tcl-992b51fc822addcd91ae1ea44e0df3486e654c3d.tar.bz2
Rebuild [dict] as a full compiled ensemble.
Diffstat (limited to 'tests/dict.test')
-rw-r--r--tests/dict.test6
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/dict.test b/tests/dict.test
index 4d3485b..a296fce 100644
--- a/tests/dict.test
+++ b/tests/dict.test
@@ -9,7 +9,7 @@
# 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.21 2007/09/08 22:36:59 dkf Exp $
+# RCS: @(#) $Id: dict.test,v 1.22 2007/11/22 22:16:08 dkf Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
package require tcltest 2
@@ -35,10 +35,10 @@ proc getOrder {dictVal args} {
test dict-1.1 {dict command basic syntax} {
list [catch {dict} msg] $msg
-} {1 {wrong # args: should be "dict subcommand ?arg ...?"}}
+} {1 {wrong # args: should be "dict subcommand ?argument ...?"}}
test dict-1.2 {dict command basic syntax} {
list [catch {dict ?} msg] $msg
-} {1 {bad subcommand "?": must be append, create, exists, filter, for, get, incr, info, keys, lappend, merge, remove, replace, set, size, unset, update, values, or with}}
+} {1 {unknown or ambiguous subcommand "?": must be append, create, exists, filter, for, get, incr, info, keys, lappend, merge, remove, replace, set, size, unset, update, values, or with}}
test dict-2.1 {dict create command} {
dict create