fluencelabs/redis
1
0
Fork 0
mirror of https://github.com/fluencelabs/redis synced 2025-04-25 10:32:14 +00:00
Code Issues Projects Releases Wiki Activity

better recap of failed tests.

Browse Source
This commit is contained in:
antirez 2011-07-11 12:56:00 +02:00
parent 04e2410d2d
commit 121ffc85f4
3 changed files with 11 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
tests/support/test.tcl
View File

@ -98,9 +98,7 @@ proc test {name code {okpattern undefined}} {
incr ::num_tests incr ::num_tests
set details {} set details {}
lappend details $::curfile lappend details "$name in $::curfile"
lappend details $::tags
lappend details $name
send_data_packet $::test_server_fd testing $name send_data_packet $::test_server_fd testing $name
@ -111,7 +109,7 @@ proc test {name code {okpattern undefined}} {
lappend ::tests_failed $details lappend ::tests_failed $details
incr ::num_failed incr ::num_failed
send_data_packet $::test_server_fd err $name send_data_packet $::test_server_fd err [join $details "\n"]
} else { } else {
# Re-raise, let handler up the stack take care of this. # Re-raise, let handler up the stack take care of this.
error $error $::errorInfo error $error $::errorInfo
@ -126,7 +124,7 @@ proc test {name code {okpattern undefined}} {
lappend ::tests_failed $details lappend ::tests_failed $details
incr ::num_failed incr ::num_failed
send_data_packet $::test_server_fd err $name send_data_packet $::test_server_fd err [join $details "\n"]
} }
} }

2
tests/test_helper.tcl
View File

@ -277,7 +277,7 @@ proc the_end {} {
puts " $time seconds - $name" puts " $time seconds - $name"
} }
if {[llength $::failed_tests]} { if {[llength $::failed_tests]} {
puts "!!! WARNING: The following tests failed\n" puts "\n[colorstr bold-red {!!! WARNING}] The following tests failed:\n"
foreach failed $::failed_tests { foreach failed $::failed_tests {
puts "*** $failed" puts "*** $failed"
} }

14
tests/unit/other.tcl
View File

@ -1,4 +1,11 @@
start_server {tags {"other"}} { start_server {tags {"other"}} {
if {$::force_failure} {
# This is used just for test suite development purposes.
test {Failing test} {
format err
} {ok}
}
test {SAVE - make sure there are all the types as values} { test {SAVE - make sure there are all the types as values} {
# Wait for a background saving in progress to terminate # Wait for a background saving in progress to terminate
waitForBgsave r waitForBgsave r
@ -242,11 +249,4 @@ start_server {tags {"other"}} {
test {Perform a final SAVE to leave a clean DB on disk} { test {Perform a final SAVE to leave a clean DB on disk} {
r save r save
} {OK} } {OK}
if {$::force_failure} {
# This is used just for test suite development purposes.
test {Failing test} {
format err
} {ok}
}
} }