gvsafronov/futriix
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

new test engine valgrind support

Browse Source
This commit is contained in:
antirez 2011-07-11 13:41:06 +02:00
parent c7c16a32a7
commit 4c378d7f6c
3 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
tests/integration/aof.tcl
View File

@ -32,6 +32,7 @@ tags {"aof"} {
start_server_aof [list dir $server_path] { start_server_aof [list dir $server_path] {
test "Unfinished MULTI: Server should not have been started" { test "Unfinished MULTI: Server should not have been started" {
if {$::valgrind} {after 2000}
assert_equal 0 [is_alive $srv] assert_equal 0 [is_alive $srv]
} }
@ -49,6 +50,7 @@ tags {"aof"} {
start_server_aof [list dir $server_path] { start_server_aof [list dir $server_path] {
test "Short read: Server should not have been started" { test "Short read: Server should not have been started" {
if {$::valgrind} {after 2000}
assert_equal 0 [is_alive $srv] assert_equal 0 [is_alive $srv]
} }

1
tests/integration/replication.tcl
View File

@ -54,6 +54,7 @@ start_server {tags {"repl"}} {
test {SET on the master should immediately propagate} { test {SET on the master should immediately propagate} {
r -1 set mykey bar r -1 set mykey bar
if {$::valgrind} {after 2000}
r 0 get mykey r 0 get mykey
} {bar} } {bar}
} }

5
tests/support/server.tcl
View File

@ -19,10 +19,7 @@ proc check_valgrind_errors stderr {
if {![regexp -- {ERROR SUMMARY: 0 errors} $buf] || if {![regexp -- {ERROR SUMMARY: 0 errors} $buf] ||
(![regexp -- {definitely lost: 0 bytes} $buf] && (![regexp -- {definitely lost: 0 bytes} $buf] &&
![regexp -- {no leaks are possible} $buf])} { ![regexp -- {no leaks are possible} $buf])} {
puts "*** VALGRIND ERRORS ***" send_data_packet $::test_server_fd err "Valgrind error: $buf\n"
puts $buf
puts "-----------------------"
append ::valgrind_errors "$buf\n\n"
} }
} }