From c7c16a32a755ca704295046c1d0c22856cbc96ff Mon Sep 17 00:00:00 2001 From: antirez Date: Mon, 11 Jul 2011 13:19:42 +0200 Subject: [PATCH] cleanup after test --- tests/test_helper.tcl | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/tests/test_helper.tcl b/tests/test_helper.tcl index ce1af659d..fbd9d3b31 100644 --- a/tests/test_helper.tcl +++ b/tests/test_helper.tcl @@ -140,7 +140,7 @@ proc s {args} { } proc cleanup {} { - puts -nonewline "Cleanup: warning may take some time... " + puts -nonewline "Cleanup: may take some time... " flush stdout catch {exec rm -rf {*}[glob tests/tmp/redis.conf.*]} catch {exec rm -rf {*}[glob tests/tmp/server.*]} @@ -281,9 +281,11 @@ proc the_end {} { foreach failed $::failed_tests { puts "*** $failed" } + cleanup exit 1 } else { puts "\n[colorstr bold-white {\o/}] [colorstr bold-green {All tests passed without errors!}]\n" + cleanup exit 0 } }