From 6a18afff59c1b6171b7bd545d9151b9fbad15cad Mon Sep 17 00:00:00 2001
From: antirez <antirez@gmail.com>
Date: Tue, 25 Feb 2014 08:33:41 +0100
Subject: [PATCH] Sentinel test: jump to next unit on test failure.

Sentinel tests are designed to be dependent on the previous tests in the
same unit, so usually we can't continue with the next test in the same
unit if a previous test failed.
---
 tests/sentinel.tcl | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/tests/sentinel.tcl b/tests/sentinel.tcl
index e278aea70..b15bce656 100644
--- a/tests/sentinel.tcl
+++ b/tests/sentinel.tcl
@@ -145,6 +145,8 @@ proc test {descr code} {
             set msg [string range $error 10 end]
             puts [colorstr red $msg]
             if {$::pause_on_error} pause_on_error
+            puts "(Jumping to next unit after error)"
+            return -code continue
         } else {
             # Re-raise, let handler up the stack take care of this.
             error $error $::errorInfo