diff options
author | antirez <antirez@gmail.com> | 2016-06-28 09:26:28 +0200 |
---|---|---|
committer | antirez <antirez@gmail.com> | 2016-06-28 09:27:14 +0200 |
commit | 49899866c89e9383a590e02d1846fb88e1729bc5 (patch) | |
tree | 931d48bf9b9ea03021d7dd8d29ce84cc5676e1a6 /tests | |
parent | dc18a6a6f84dfe3a09c2219f43bf3a7dd8faf2a5 (diff) | |
download | redis-49899866c89e9383a590e02d1846fb88e1729bc5.tar.gz |
Regression test for issue #3343 exact min crash sequence.
Note: it was verified that it can crash the test suite without the patch
applied.
Diffstat (limited to 'tests')
-rw-r--r-- | tests/unit/type/list-3.tcl | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/tests/unit/type/list-3.tcl b/tests/unit/type/list-3.tcl index ece6ea2d5..744f70371 100644 --- a/tests/unit/type/list-3.tcl +++ b/tests/unit/type/list-3.tcl @@ -13,6 +13,22 @@ start_server { assert_equal [r lindex l 1] [lindex $mylist 1] } + test {Regression for quicklist #3343 bug} { + r del mylist + r lpush mylist 401 + r lpush mylist 392 + r rpush mylist [string repeat x 5105]"799" + r lset mylist -1 [string repeat x 1014]"702" + r lpop mylist + r lset mylist -1 [string repeat x 4149]"852" + r linsert mylist before 401 [string repeat x 9927]"12" + r lrange mylist 0 -1 + r ping ; # It's enough if the server is still alive + } {PONG} + + test {Stress tester for #3343-alike bugs} { + } + tags {slow} { test {ziplist implementation: value encoding and backlink} { if {$::accurate} {set iterations 100} else {set iterations 10} |