From 9e0b9f12b2bd0a522c75dbdbacbf2a7204ee2588 Mon Sep 17 00:00:00 2001
From: antirez <antirez@gmail.com>
Date: Tue, 25 Mar 2014 09:33:27 +0100
Subject: [PATCH] Test: do not complain when "leaks" can't run because process
 died.

---
 tests/support/server.tcl | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/tests/support/server.tcl b/tests/support/server.tcl
index b53abb2ef..de4f66db0 100644
--- a/tests/support/server.tcl
+++ b/tests/support/server.tcl
@@ -40,6 +40,10 @@ proc kill_server config {
                     test "Check for memory leaks (pid $pid)" {
                         set output {0 leaks}
                         catch {exec leaks $pid} output
+                        if {[string match {*process does not exist*} $output]} {
+                            # In a few tests we kill the server process.
+                            set output "0 leaks"
+                        }
                         set output
                     } {*0 leaks*}
                 }