summaryrefslogtreecommitdiffstats
path: root/tests/namespace-old.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-10-30 13:37:42 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-10-30 13:37:42 (GMT)
commit8f3e8012b1ad2c0f87eeba801b88e438b85143af (patch)
tree129f62422f2c348f41663d1c15a1deb2a47f4610 /tests/namespace-old.test
parentcfe53b8870af9dc22186aadfaec26380ae433716 (diff)
parent076a7e2839881c03d0a98a8fc50823aef42ad79a (diff)
downloadtcl-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.test4
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]