Redis test: when assertion fails print not just the expression but al…

…so expanded values in the error message.
lendo · Jan 7, 2012 · d4945b2 · d4945b2
1 parent 5378578
commit d4945b2
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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]])"
     }
 }