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
6b6f101c
Commit
6b6f101c
authored
Jun 03, 2010
by
Pieter Noordhuis
Browse files
tag more slow tests
parent
5713f06b
Changes
2
Hide whitespace changes
Inline
Side-by-side
tests/unit/expire.tcl
View file @
6b6f101c
...
...
@@ -12,10 +12,12 @@ start_server {tags {"expire"}} {
r get x
}
{
foobar
}
test
{
EXPIRE - After 6 seconds the key should no longer be here
}
{
after 6000
list
[
r get x
]
[
r exists x
]
}
{{}
0
}
tags
{
"slow"
}
{
test
{
EXPIRE - After 6 seconds the key should no longer be here
}
{
after 6000
list
[
r get x
]
[
r exists x
]
}
{{}
0
}
}
test
{
EXPIRE - Delete on write policy
}
{
r del x
...
...
tests/unit/other.tcl
View file @
6b6f101c
...
...
@@ -12,20 +12,22 @@ start_server {} {
r save
}
{
OK
}
foreach fuzztype
{
binary alpha compr
}
{
test
"FUZZ stresser with data model
$fuzztype
"
{
set err 0
for
{
set i 0
}
{
$i
< 10000
}
{
incr i
}
{
set fuzz
[
randstring 0 512 $fuzztype
]
r set foo $fuzz
set got
[
r get foo
]
if
{
$got
ne $fuzz
}
{
set err
[
list $fuzz $got
]
break
tags
{
"slow"
}
{
foreach fuzztype
{
binary alpha compr
}
{
test
"FUZZ stresser with data model
$fuzztype
"
{
set err 0
for
{
set i 0
}
{
$i
< 10000
}
{
incr i
}
{
set fuzz
[
randstring 0 512 $fuzztype
]
r set foo $fuzz
set got
[
r get foo
]
if
{
$got
ne $fuzz
}
{
set err
[
list $fuzz $got
]
break
}
}
}
set _ $err
}
{
0
}
set _ $err
}
{
0
}
}
}
test
{
BGSAVE
}
{
...
...
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