summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMiguel Sofer <miguel.sofer@gmail.com>2004-05-02 21:04:44 (GMT)
committerMiguel Sofer <miguel.sofer@gmail.com>2004-05-02 21:04:44 (GMT)
commitbd2452b05ad18d7a755643a1608882eee9f37023 (patch)
tree4a85588349f1a4d65bca7d73a4dd8d155849c3aa
parent0a1f66b1c502875f43acf2671f8d7770a830e4cc (diff)
downloadtcl-bd2452b05ad18d7a755643a1608882eee9f37023.zip
tcl-bd2452b05ad18d7a755643a1608882eee9f37023.tar.gz
tcl-bd2452b05ad18d7a755643a1608882eee9f37023.tar.bz2
cleaning up after new test in last commit
-rw-r--r--tests/proc.test3
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/proc.test b/tests/proc.test
index ef5f3c4..4f7fab6 100644
--- a/tests/proc.test
+++ b/tests/proc.test
@@ -13,7 +13,7 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: proc.test,v 1.14 2004/05/02 20:49:56 msofer Exp $
+# RCS: @(#) $Id: proc.test,v 1.15 2004/05/02 21:04:44 msofer Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
package require tcltest
@@ -174,6 +174,7 @@ test proc-3.6 {TclObjInterpProc, proper quoting of proc name, Bug 942757} {
catch {namespace delete {expand}[namespace children :: test_ns_*]}
catch {rename p ""}
catch {rename {} ""}
+catch {rename {a b c} {}}
catch {unset msg}
if {[catch {package require procbodytest}]} {