diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-10-30 13:37:42 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-10-30 13:37:42 (GMT) |
commit | 8f3e8012b1ad2c0f87eeba801b88e438b85143af (patch) | |
tree | 129f62422f2c348f41663d1c15a1deb2a47f4610 /tests/namespace-old.test | |
parent | cfe53b8870af9dc22186aadfaec26380ae433716 (diff) | |
parent | 076a7e2839881c03d0a98a8fc50823aef42ad79a (diff) | |
download | tcl-8f3e8012b1ad2c0f87eeba801b88e438b85143af.zip tcl-8f3e8012b1ad2c0f87eeba801b88e438b85143af.tar.gz tcl-8f3e8012b1ad2c0f87eeba801b88e438b85143af.tar.bz2 |
Merge 8.6
Diffstat (limited to 'tests/namespace-old.test')
-rw-r--r-- | tests/namespace-old.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/namespace-old.test b/tests/namespace-old.test index f503a4d..636f953 100644 --- a/tests/namespace-old.test +++ b/tests/namespace-old.test @@ -749,13 +749,13 @@ test namespace-old-9.14 {imported commands can be removed} { } {{} 1 {invalid command name "cmd1"}} test namespace-old-9.15 {existing commands can't be overwritten} { proc cmd1 {x y} { - return [expr $x+$y] + return [expr {$x+$y}] } list [catch {namespace import test_ns_import::cmd?} msg] $msg \ [cmd1 3 5] } {1 {can't import command "cmd1": already exists} 8} test namespace-old-9.16 {use "-force" option to override existing commands} { - proc cmd1 {x y} { return [expr $x+$y] } + proc cmd1 {x y} { return [expr {$x+$y}] } list [cmd1 3 5] \ [namespace import -force test_ns_import::cmd?] \ [cmd1 3 5] |