Commit a93f8f09 authored by antirez's avatar antirez
Browse files

Test: XDEL basic test.

parent d4182a0a
...@@ -234,6 +234,18 @@ start_server { ...@@ -234,6 +234,18 @@ start_server {
assert {[lindex $res 0 1 1 1] eq {field two}} assert {[lindex $res 0 1 1 1] eq {field two}}
} }
test {XDEL basic test} {
r del somestream
r xadd somestream * foo value0
set id [r xadd somestream * foo value1]
r xadd somestream * foo value2
r xdel somestream $id
assert {[r xlen somestream] == 2}
set result [r xrange somestream - +]
assert {[lindex $result 0 1 1] eq {value0}}
assert {[lindex $result 1 1 1] eq {value2}}
}
test {XRANGE fuzzing} { test {XRANGE fuzzing} {
set low_id [lindex $items 0 0] set low_id [lindex $items 0 0]
set high_id [lindex $items end 0] set high_id [lindex $items end 0]
......
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