From 202e3091d7554df42e520c3e6f7c6d54c1ad7728 Mon Sep 17 00:00:00 2001
From: antirez <antirez@gmail.com>
Date: Wed, 21 Dec 2011 09:23:22 +0100
Subject: [PATCH] Redis test: when assertion fails print not just the
 expression but also expanded values in the error message.

---
 tests/support/test.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/support/test.tcl b/tests/support/test.tcl
index c875cfd80..e53d497bb 100644
--- a/tests/support/test.tcl
+++ b/tests/support/test.tcl
@@ -5,7 +5,7 @@ set ::tests_failed {}
 
 proc assert {condition} {
     if {![uplevel 1 expr $condition]} {
-        error "assertion:Expected condition '$condition' to be true"
+        error "assertion:Expected condition '$condition' to be true ([uplevel 1 [list subst -nocommands $condition]])"
     }
 }