From 79c06cebc59a8bb6423c763367e84015e5fb0322 Mon Sep 17 00:00:00 2001 From: dgp Date: Mon, 27 Feb 2006 19:43:58 +0000 Subject: added missing constraint --- tests/namespace.test | 7 +++++-- 1 file 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}] -- cgit v0.12