diff options
author | Miguel Sofer <miguel.sofer@gmail.com> | 2009-03-21 12:56:32 (GMT) |
---|---|---|
committer | Miguel Sofer <miguel.sofer@gmail.com> | 2009-03-21 12:56:32 (GMT) |
commit | ab9a47e0ff72d649bf59699ad82b58f2719afe8f (patch) | |
tree | fcdf58cc7cd2fa913792f8269b3a25e3c4b5a100 /tests | |
parent | 30abb158de1f9a67dce9c82012db2b1c826107bd (diff) | |
download | tcl-ab9a47e0ff72d649bf59699ad82b58f2719afe8f.zip tcl-ab9a47e0ff72d649bf59699ad82b58f2719afe8f.tar.gz tcl-ab9a47e0ff72d649bf59699ad82b58f2719afe8f.tar.bz2 |
removed extra cleanupTests call
Diffstat (limited to 'tests')
-rw-r--r-- | tests/tailcall.test | 6 |
1 files changed, 1 insertions, 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]] |