mirror of
https://github.com/fluencelabs/redis
synced 2025-03-17 16:10:50 +00:00
Test: XDEL fuzz testing. Remove and check stage.
This commit is contained in:
parent
3d7d20b7f3
commit
2352a51992
@ -264,6 +264,21 @@ start_server {
|
||||
# to report the right number of elements with XRANGE: this will also
|
||||
# force accessing the whole data structure to check sanity.
|
||||
assert {[r xlen somestream] == $x}
|
||||
|
||||
# We want to remove elements in random order to really test the
|
||||
# implementation in a better way.
|
||||
set ids [lshuffle $ids]
|
||||
foreach id $ids {
|
||||
assert {[r xdel somestream $id] == 1}
|
||||
incr x -1
|
||||
assert {[r xlen somestream] == $x}
|
||||
# The test would be too slow calling XRANGE for every iteration.
|
||||
# Do it every 100 removal.
|
||||
if {$x % 100 == 0} {
|
||||
set res [r xrange somestream - +]
|
||||
assert {[llength $res] == $x}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
test {XRANGE fuzzing} {
|
||||
|
Loading…
x
Reference in New Issue
Block a user