Test: --dont-clean should do first cleanup.
This commit is contained in:
parent
140c20fb5e
commit
e49d97298a
@ -216,9 +216,6 @@ proc run_solo {name code} {
|
|||||||
}
|
}
|
||||||
|
|
||||||
proc cleanup {} {
|
proc cleanup {} {
|
||||||
if {$::dont_clean} {
|
|
||||||
return
|
|
||||||
}
|
|
||||||
if {!$::quiet} {puts -nonewline "Cleanup: may take some time... "}
|
if {!$::quiet} {puts -nonewline "Cleanup: may take some time... "}
|
||||||
flush stdout
|
flush stdout
|
||||||
catch {exec rm -rf {*}[glob tests/tmp/redis.conf.*]}
|
catch {exec rm -rf {*}[glob tests/tmp/redis.conf.*]}
|
||||||
@ -456,11 +453,11 @@ proc the_end {} {
|
|||||||
foreach failed $::failed_tests {
|
foreach failed $::failed_tests {
|
||||||
puts "*** $failed"
|
puts "*** $failed"
|
||||||
}
|
}
|
||||||
cleanup
|
if {!$::dont_clean} cleanup
|
||||||
exit 1
|
exit 1
|
||||||
} else {
|
} else {
|
||||||
puts "\n[colorstr bold-white {\o/}] [colorstr bold-green {All tests passed without errors!}]\n"
|
puts "\n[colorstr bold-white {\o/}] [colorstr bold-green {All tests passed without errors!}]\n"
|
||||||
cleanup
|
if {!$::dont_clean} cleanup
|
||||||
exit 0
|
exit 0
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user