From 74354ceef53651aa30486a1b7181438d71cfbd1b Mon Sep 17 00:00:00 2001
From: antirez <antirez@gmail.com>
Date: Wed, 25 Feb 2015 10:37:52 +0100
Subject: [PATCH] Test: fixes a few tests after basic unit refactoring.

---
 tests/unit/type/string.tcl | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/tests/unit/type/string.tcl b/tests/unit/type/string.tcl
index c98d5681..7122fd98 100644
--- a/tests/unit/type/string.tcl
+++ b/tests/unit/type/string.tcl
@@ -38,6 +38,7 @@ start_server {tags {"string"}} {
         } {}
 
         test {SET 10000 numeric keys and access all them in reverse order} {
+            r flushdb
             set err {}
             for {set x 0} {$x < 10000} {incr x} {
                 r set $x $x
@@ -53,9 +54,9 @@ start_server {tags {"string"}} {
             set _ $err
         } {}
 
-        test {DBSIZE should be 10101 now} {
+        test {DBSIZE should be 10000 now} {
             r dbsize
-        } {10101}
+        } {10000}
     }
 
     test "SETNX target key missing" {
@@ -119,6 +120,7 @@ start_server {tags {"string"}} {
     } {BAR {} FOO {}}
 
     test {GETSET (set new value)} {
+        r del foo
         list [r getset foo xyz] [r get foo]
     } {{} xyz}