Author: coke
Date: Tue Aug 19 07:56:31 2008
New Revision: 30344
Modified:
branches/RELEASE_0_7_0/languages/tcl/t/cmd_namespace.t
Log:
[tcl] temporarily TODO some failing tests for the release.
Modified: branches/RELEASE_0_7_0/languages/tcl/t/cmd_namespace.t
==============================================================================
--- branches/RELEASE_0_7_0/languages/tcl/t/cmd_namespace.t (original)
+++ branches/RELEASE_0_7_0/languages/tcl/t/cmd_namespace.t Tue Aug 19
07:56:31 2008
@@ -78,7 +78,7 @@
{wrong # args: should be "namespace exists name"} \
{namespace exists: too many args}
-is [namespace exists a] 0 {namespace exists: failure}
+eval_is {namespace exists a} 0 {namespace exists: failure} {TODO {broken in
r30286}}
is [namespace exists {}] 1 {namespace exists: global implicit}
is [namespace exists ::] 1 {namespace exists: global explicit}
@@ -108,8 +108,7 @@
is [set bar] ok {namespace eval + proc + upvar}
namespace delete foo
-is [namespace exists foo] 0 {namespace delete}
-
+eval_is {namespace exists foo} 0 {namespace delete} {TODO {broken in r30286}}
eval_is {namespace current foo} \
{wrong # args: should be "namespace current"} \
