diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-07-02 17:21:53 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-07-02 17:21:53 (GMT) |
| commit | dd879c794d6af3bab4cfb8b36708db2fc70b5f46 (patch) | |
| tree | 642e72b2957bdc240f47bb9d915a52d60995d771 /tests | |
| parent | 1481e6f3daec8e1ad34ee1bc0544222670c890f5 (diff) | |
| download | tcl-dd879c794d6af3bab4cfb8b36708db2fc70b5f46.zip tcl-dd879c794d6af3bab4cfb8b36708db2fc70b5f46.tar.gz tcl-dd879c794d6af3bab4cfb8b36708db2fc70b5f46.tar.bz2 | |
[f961d7d1dd] Repair usage message for ensemble parameters with spaces.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/namespace.test | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/namespace.test b/tests/namespace.test index c433241..dc1d3bf 100644 --- a/tests/namespace.test +++ b/tests/namespace.test @@ -2153,6 +2153,15 @@ test namespace-50.7 {[4402cfa58c]} -setup { rename e2 {} rename target {} } -result {{wrong # args: should be "e1 s2 s1 x y"} {wrong # args: should be "e1 s2 s1 x y"} {wrong # args: should be "e1 s2 s1 x y"} {wrong # args: should be "e1 s2 s1 x y"}} +test namespace-50.8 {[f961d7d1dd]} -setup { + proc target {} {} + namespace ensemble create -command e -map {s target} -parameters {{a b}} +} -body { + e +} -returnCodes error -result {wrong # args: should be "e {a b} subcommand ?arg ...?"} -cleanup { + rename e {} + rename target {} +} test namespace-51.1 {name resolution path control} -body { namespace eval ::test_ns_1 { |