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
cfc879b5
Commit
cfc879b5
authored
Jan 15, 2016
by
antirez
Browse files
Merge branch 'unstable' of github.com:/antirez/redis into unstable
parents
b01b32b3
86373841
Changes
1
Hide whitespace changes
Inline
Side-by-side
tests/unit/introspection.tcl
View file @
cfc879b5
...
@@ -6,16 +6,17 @@ start_server {tags {"introspection"}} {
...
@@ -6,16 +6,17 @@ start_server {tags {"introspection"}} {
test
{
MONITOR can log executed commands
}
{
test
{
MONITOR can log executed commands
}
{
set rd
[
redis_deferring_client
]
set rd
[
redis_deferring_client
]
$rd monitor
$rd monitor
assert_match
{
*OK*
}
[
$rd
read
]
r set foo bar
r set foo bar
r get foo
r get foo
list
[
$rd
read
]
[
$rd
read
]
[
$rd
read
]
list
[
$rd
read
]
[
$rd
read
]
}
{
*
OK*
"set"
"foo"
*
"get"
"foo"
*
}
}
{
*
"set"
"foo"
*
"get"
"foo"
*
}
test
{
MONITOR can log commands issued by the scripting engine
}
{
test
{
MONITOR can log commands issued by the scripting engine
}
{
set rd
[
redis_deferring_client
]
set rd
[
redis_deferring_client
]
$rd monitor
$rd monitor
r eval
{
redis.call
(
'set',KEYS
[
1
]
,ARGV
[
1
])}
1 foo bar
$rd read
;
# Discard the OK
$rd read
;
# Discard the OK
r eval
{
redis.call
(
'set',KEYS
[
1
]
,ARGV
[
1
])}
1 foo bar
assert_match
{
*eval*
}
[
$rd
read
]
assert_match
{
*eval*
}
[
$rd
read
]
assert_match
{
*lua*
"set"
*
"foo"
*
"bar"
*
}
[
$rd
read
]
assert_match
{
*lua*
"set"
*
"foo"
*
"bar"
*
}
[
$rd
read
]
}
}
...
...
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