From ab9a47e0ff72d649bf59699ad82b58f2719afe8f Mon Sep 17 00:00:00 2001 From: Miguel Sofer Date: Sat, 21 Mar 2009 12:56:32 +0000 Subject: removed extra cleanupTests call --- tests/tailcall.test | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) diff --git a/tests/tailcall.test b/tests/tailcall.test index c0e7cdb..0d0bf65 100644 --- a/tests/tailcall.test +++ b/tests/tailcall.test @@ -9,7 +9,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: tailcall.test,v 1.6 2009/03/21 12:26:56 msofer Exp $ +# RCS: @(#) $Id: tailcall.test,v 1.7 2009/03/21 12:56:32 msofer Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest @@ -376,10 +376,6 @@ test tailcall-11b {tailcall and uplevel} -setup { unset -nocomplain ::x } -match glob -result *tailcall* -returnCodes error -# cleanup -::tcltest::cleanupTests - - test tailcall-12.1 {[Bug 2649975]} -setup { proc dump {{text {}}} { set text [uplevel 1 [list subst $text]] -- cgit v0.12