Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

tests for variadic list push

  • Loading branch information...
commit 1b905277bb61255441a24a2a3667d5899b1c448f 1 parent fb90934
@antirez authored
Showing with 16 additions and 0 deletions.
  1. +16 −0 tests/unit/type/list.tcl
View
16 tests/unit/type/list.tcl
@@ -55,6 +55,13 @@ start_server {
assert_equal $largevalue(linkedlist) [r lindex mylist2 2]
}
+ test {Variadic RPUSH/LPUSH} {
+ r del mylist
+ assert_equal 4 [r lpush mylist a b c d]
+ assert_equal 8 [r rpush mylist 0 1 2 3]
+ assert_equal {d c b a 0 1 2 3} [r lrange mylist 0 -1]
+ }
+
test {DEL a list - ziplist} {
assert_equal 1 [r del myziplist2]
assert_equal 0 [r exists myziplist2]
@@ -142,6 +149,15 @@ start_server {
}
}
+ test "BLPOP with variadic LPUSH" {
+ set rd [redis_deferring_client]
+ r del blist target
+ $rd blpop blist 0
+ assert_equal 2 [r lpush blist foo bar]
+ assert_equal {blist foo} [$rd read]
+ assert_equal bar [lindex [r lrange blist 0 -1] 0]
+ }
+
test "BRPOPLPUSH with zero timeout should block indefinitely" {
set rd [redis_deferring_client]
r del blist target
Please sign in to comment.
Something went wrong with that request. Please try again.