Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
ruanhaishen
redis
Commits
04a10b1a
Commit
04a10b1a
authored
Mar 22, 2011
by
Pieter Noordhuis
Browse files
Test that sorted sets are removed when empty
parent
48991620
Changes
1
Hide whitespace changes
Inline
Side-by-side
tests/unit/type/zset.tcl
View file @
04a10b1a
...
@@ -53,6 +53,18 @@ start_server {tags {"zset"}} {
...
@@ -53,6 +53,18 @@ start_server {tags {"zset"}} {
assert_equal 0
[
r zcard zdoesntexist
]
assert_equal 0
[
r zcard zdoesntexist
]
}
}
test
"ZREM removes key after last element is removed"
{
r del ztmp
r zadd ztmp 10 x
r zadd ztmp 20 y
assert_equal 1
[
r exists ztmp
]
assert_equal 0
[
r zrem ztmp z
]
assert_equal 1
[
r zrem ztmp y
]
assert_equal 1
[
r zrem ztmp x
]
assert_equal 0
[
r exists ztmp
]
}
test
"ZRANGE basics -
$encoding
"
{
test
"ZRANGE basics -
$encoding
"
{
r del ztmp
r del ztmp
r zadd ztmp 1 a
r zadd ztmp 1 a
...
@@ -244,6 +256,7 @@ start_server {tags {"zset"}} {
...
@@ -244,6 +256,7 @@ start_server {tags {"zset"}} {
test
"ZREMRANGEBYSCORE basics"
{
test
"ZREMRANGEBYSCORE basics"
{
proc remrangebyscore
{
min max
}
{
proc remrangebyscore
{
min max
}
{
create_zset zset
{
1 a 2 b 3 c 4 d 5 e
}
create_zset zset
{
1 a 2 b 3 c 4 d 5 e
}
assert_equal 1
[
r exists zset
]
r zremrangebyscore zset $min $max
r zremrangebyscore zset $min $max
}
}
...
@@ -290,6 +303,10 @@ start_server {tags {"zset"}} {
...
@@ -290,6 +303,10 @@ start_server {tags {"zset"}} {
# exclusive min and max
# exclusive min and max
assert_equal 3
[
remrangebyscore
(
1
(
5
]
assert_equal 3
[
remrangebyscore
(
1
(
5
]
assert_equal
{
a e
}
[
r zrange zset 0 -1
]
assert_equal
{
a e
}
[
r zrange zset 0 -1
]
# destroy when empty
assert_equal 5
[
remrangebyscore 1 5
]
assert_equal 0
[
r exists zset
]
}
}
test
"ZREMRANGEBYSCORE with non-value min or max"
{
test
"ZREMRANGEBYSCORE with non-value min or max"
{
...
@@ -301,6 +318,7 @@ start_server {tags {"zset"}} {
...
@@ -301,6 +318,7 @@ start_server {tags {"zset"}} {
test
"ZREMRANGEBYRANK basics"
{
test
"ZREMRANGEBYRANK basics"
{
proc remrangebyrank
{
min max
}
{
proc remrangebyrank
{
min max
}
{
create_zset zset
{
1 a 2 b 3 c 4 d 5 e
}
create_zset zset
{
1 a 2 b 3 c 4 d 5 e
}
assert_equal 1
[
r exists zset
]
r zremrangebyrank zset $min $max
r zremrangebyrank zset $min $max
}
}
...
@@ -323,6 +341,10 @@ start_server {tags {"zset"}} {
...
@@ -323,6 +341,10 @@ start_server {tags {"zset"}} {
# end overflow
# end overflow
assert_equal 5
[
remrangebyrank 0 10
]
assert_equal 5
[
remrangebyrank 0 10
]
assert_equal
{}
[
r zrange zset 0 -1
]
assert_equal
{}
[
r zrange zset 0 -1
]
# destroy when empty
assert_equal 5
[
remrangebyrank 0 4
]
assert_equal 0
[
r exists zset
]
}
}
test
"ZUNIONSTORE against non-existing key doesn't set destination -
$encoding
"
{
test
"ZUNIONSTORE against non-existing key doesn't set destination -
$encoding
"
{
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment