slipenkomk/valkey
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Sentiel test: add test start time in output.

Browse Source
This commit is contained in:
antirez 2014-03-04 11:17:27 +01:00
parent c5edd91716
commit dd8d883c9c
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
tests/sentinel.tcl
View File

@ -101,9 +101,9 @@ proc parse_options {} {
} elseif {$opt eq "--help"} {
puts "Hello, I'm sentinel.tcl and I run Sentinel unit tests."
puts "\nOptions:"
puts "--single <pattern> Only runs tests specified by pattern."
puts "--pause-on-error Pause for manual inspection on error."
puts "--help Shows this help."
puts "--single <pattern> Only runs tests specified by pattern."
puts "--pause-on-error Pause for manual inspection on error."
puts "--help Shows this help."
exit 0
} else {
puts "Unknown option $opt"
@ -137,7 +137,8 @@ proc pause_on_error {} {
# We redefine 'test' as for Sentinel we don't use the server-client
# architecture for the test, everything is sequential.
proc test {descr code} {
puts -nonewline "> $descr: "
set ts [clock format [clock seconds] -format %H:%M:%S]
puts -nonewline "$ts> $descr: "
flush stdout
if {[catch {set retval [uplevel 1 $code]} error]} {