Commit 652e662d authored by antirez's avatar antirez
Browse files

Test: fix false positive in HSTRLEN test.

HINCRBY* tests later used the value "tmp" that was sometimes generated
by the random key generation function. The result was ovewriting what
Tcl expected to be inside Redis with another value, causing the next
HSTRLEN test to fail.
parent a0ff29bc
...@@ -2,8 +2,8 @@ start_server {tags {"hash"}} { ...@@ -2,8 +2,8 @@ start_server {tags {"hash"}} {
test {HSET/HLEN - Small hash creation} { test {HSET/HLEN - Small hash creation} {
array set smallhash {} array set smallhash {}
for {set i 0} {$i < 8} {incr i} { for {set i 0} {$i < 8} {incr i} {
set key [randstring 0 8 alpha] set key __avoid_collisions__[randstring 0 8 alpha]
set val [randstring 0 8 alpha] set val __avoid_collisions__[randstring 0 8 alpha]
if {[info exists smallhash($key)]} { if {[info exists smallhash($key)]} {
incr i -1 incr i -1
continue continue
...@@ -21,8 +21,8 @@ start_server {tags {"hash"}} { ...@@ -21,8 +21,8 @@ start_server {tags {"hash"}} {
test {HSET/HLEN - Big hash creation} { test {HSET/HLEN - Big hash creation} {
array set bighash {} array set bighash {}
for {set i 0} {$i < 1024} {incr i} { for {set i 0} {$i < 1024} {incr i} {
set key [randstring 0 8 alpha] set key __avoid_collisions__[randstring 0 8 alpha]
set val [randstring 0 8 alpha] set val __avoid_collisions__[randstring 0 8 alpha]
if {[info exists bighash($key)]} { if {[info exists bighash($key)]} {
incr i -1 incr i -1
continue continue
...@@ -33,7 +33,7 @@ start_server {tags {"hash"}} { ...@@ -33,7 +33,7 @@ start_server {tags {"hash"}} {
list [r hlen bighash] list [r hlen bighash]
} {1024} } {1024}
test {Is the big hash encoded with a ziplist?} { test {Is the big hash encoded with an hash table?} {
assert_encoding hashtable bighash assert_encoding hashtable bighash
} }
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment