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
30a455f1
Commit
30a455f1
authored
Nov 19, 2018
by
antirez
Browse files
Test: regression test for #5570.
parent
2bd6802f
Changes
1
Hide whitespace changes
Inline
Side-by-side
tests/unit/type/stream-cgroups.tcl
View file @
30a455f1
...
@@ -132,6 +132,21 @@ start_server {
...
@@ -132,6 +132,21 @@ start_server {
assert
{[
llength
[
lindex $res 0 1
]]
== 3
}
assert
{[
llength
[
lindex $res 0 1
]]
== 3
}
}
}
test
{
XREADGROUP history reporting of deleted entries. Bug #5570
}
{
r del mystream
r XGROUP CREATE mystream mygroup $ MKSTREAM
r XADD mystream 1 field1 A
r XREADGROUP GROUP mygroup myconsumer STREAMS mystream >
r XADD mystream MAXLEN 1 2 field1 B
r XREADGROUP GROUP mygroup myconsumer STREAMS mystream >
# Now we have two pending entries, however one should be deleted
# and one should be ok
(
we should only see
"B"
)
set res
[
r XREADGROUP GROUP mygroup myconsumer STREAMS mystream 0-1
]
assert
{[
lindex $res 0 1 0
]
==
{
1-0
{}}}
assert
{[
lindex $res 0 1 1
]
==
{
2-0
{
field1 B
}}}
}
start_server
{}
{
start_server
{}
{
set master
[
srv -1 client
]
set master
[
srv -1 client
]
set master_host
[
srv -1 host
]
set master_host
[
srv -1 host
]
...
...
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