summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--tests/namespace.test7
1 files changed, 5 insertions, 2 deletions
diff --git a/tests/namespace.test b/tests/namespace.test
index bed9361..f6092cc 100644
--- a/tests/namespace.test
+++ b/tests/namespace.test
@@ -11,7 +11,7 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: namespace.test,v 1.54 2006/02/22 17:42:04 dgp Exp $
+# RCS: @(#) $Id: namespace.test,v 1.55 2006/02/27 19:43:58 dgp Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
package require tcltest 2
@@ -2508,7 +2508,10 @@ test namespace-52.9 {unknown: refcounting} -setup {
namespace unknown $handler
rename this {}
} -result {this is a test noSuchCommand}
-test namespace-52.10 {unknown: with TCL_EVAL_GLOBAL} -setup {
+testConstraint testevalobjv [llength [info commands testevalobjv]]
+test namespace-52.10 {unknown: with TCL_EVAL_GLOBAL} -constraints {
+ testevalobjv
+} -setup {
rename ::unknown unknown.save
proc ::unknown args {
set caller [uplevel 1 {namespace current}]