diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2011-03-10 21:33:27 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2011-03-10 21:33:27 (GMT) |
| commit | a4d1d04ee66ea85e63f419556b2748c8fbe9c62c (patch) | |
| tree | 20879f4cd95e27db3b1128779e7d8df706bdd0c0 /tests/namespace.test | |
| parent | 6f62d07c61ca11bfa64f8d054513eb73440c6899 (diff) | |
| parent | da1e5c136366468a775a4b57985be5929a2a19e0 (diff) | |
| download | tcl-a4d1d04ee66ea85e63f419556b2748c8fbe9c62c.zip tcl-a4d1d04ee66ea85e63f419556b2748c8fbe9c62c.tar.gz tcl-a4d1d04ee66ea85e63f419556b2748c8fbe9c62c.tar.bz2 | |
Turn namespace into an ensemble.
Diffstat (limited to 'tests/namespace.test')
| -rw-r--r-- | tests/namespace.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/namespace.test b/tests/namespace.test index fe087a5..9d7cb59 100644 --- a/tests/namespace.test +++ b/tests/namespace.test @@ -896,7 +896,7 @@ test namespace-20.1 {Tcl_NamespaceObjCmd, bad subcommand} { } {1 {wrong # args: should be "namespace subcommand ?arg ...?"}} test namespace-20.2 {Tcl_NamespaceObjCmd, bad subcommand} -body { namespace wombat {} -} -returnCodes error -match glob -result {bad option "wombat": must be *} +} -returnCodes error -match glob -result {unknown or ambiguous subcommand "wombat": must be *} test namespace-20.3 {Tcl_NamespaceObjCmd, abbreviations are okay} { namespace ch :: test_ns_* } {} @@ -1013,7 +1013,7 @@ test namespace-25.1 {NamespaceEvalCmd, bad args} { } {1 {wrong # args: should be "namespace eval name arg ?arg...?"}} test namespace-25.2 {NamespaceEvalCmd, bad args} -body { namespace test_ns_1 -} -returnCodes error -match glob -result {bad option "test_ns_1": must be *} +} -returnCodes error -match glob -result {unknown or ambiguous subcommand "test_ns_1": must be *} catch {unset v} test namespace-25.3 {NamespaceEvalCmd, new namespace} { set v 123 |