diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-10-30 14:25:59 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-10-30 14:25:59 (GMT) |
commit | 019e49cb721639318c71429003fa55ac2fbfa78d (patch) | |
tree | 835b8d5c53bb02190a5a46427f1b9b864afac725 /tests/namespace-old.test | |
parent | 991d8133789e318faad62a760b5bb76bf6dc5b87 (diff) | |
parent | 3b0ee42270085b039b75e2e27a3a145399a1bfac (diff) | |
download | tcl-019e49cb721639318c71429003fa55ac2fbfa78d.zip tcl-019e49cb721639318c71429003fa55ac2fbfa78d.tar.gz tcl-019e49cb721639318c71429003fa55ac2fbfa78d.tar.bz2 |
Merge 8.7
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 c6d4e52..760ae6e 100644 --- a/tests/namespace-old.test +++ b/tests/namespace-old.test @@ -753,13 +753,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] |