From: Pieter Noordhuis <pcnoordhuis@gmail.com>
Date: Wed, 2 Jun 2010 19:29:47 +0000 (+0200)
Subject: removed obsolete code
X-Git-Url: https://git.saurik.com/redis.git/commitdiff_plain/38273a9ed6a92f5a9c0c6250484fff677b972019?ds=inline

removed obsolete code
---

diff --git a/tests/support/test.tcl b/tests/support/test.tcl
index 1fdeb1e9..a7bcc801 100644
--- a/tests/support/test.tcl
+++ b/tests/support/test.tcl
@@ -4,7 +4,6 @@ set ::testnum 0
 
 proc test {name code okpattern} {
     incr ::testnum
-    # if {$::testnum < $::first || $::testnum > $::last} return
     puts -nonewline [format "#%03d %-68s " $::testnum $name]
     flush stdout
     if {[catch {set retval [uplevel 1 $code]} error]} {
diff --git a/tests/test_helper.tcl b/tests/test_helper.tcl
index 49239a3a..69d9bbf9 100644
--- a/tests/test_helper.tcl
+++ b/tests/test_helper.tcl
@@ -15,7 +15,6 @@ set ::traceleaks 0
 set ::valgrind 0
 
 proc execute_tests name {
-    set cur $::testnum
     source "tests/$name.tcl"
 }