diff options
author | antirez <antirez@gmail.com> | 2015-09-07 11:14:50 +0200 |
---|---|---|
committer | antirez <antirez@gmail.com> | 2015-09-07 11:14:52 +0200 |
commit | 467de61c84965208aea6d446010a504181b453f0 (patch) | |
tree | dfeff52aa506a75f5aa56050c722342dec9db376 | |
parent | d036abe27d3a7bb985f94c14b596846e321dce39 (diff) | |
download | redis-467de61c84965208aea6d446010a504181b453f0.tar.gz |
Test: print info on HSTRLEN test failure.
This additional info may provide more clues about the test randomly
failing from time to time. Probably the failure is due to some previous
test that overwrites the logical content in the Tcl variable, but this
will make the problem more obvious.
-rw-r--r-- | tests/unit/type/hash.tcl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/tests/unit/type/hash.tcl b/tests/unit/type/hash.tcl index 5ceef150c..5381b0e33 100644 --- a/tests/unit/type/hash.tcl +++ b/tests/unit/type/hash.tcl @@ -406,7 +406,10 @@ start_server {tags {"hash"}} { foreach k [array names bighash *] { if {[string length $bighash($k)] ne [r hstrlen bighash $k]} { set err "[string length $bighash($k)] != [r hstrlen bighash $k]" - break + puts "HSTRLEN and logical length mismatch:" + puts "key: $k" + puts "Logical content: $bighash($k)" + puts "Server content: [r hget bighash $k]" } } set _ $err |