diff options
| author | antirez <antirez@gmail.com> | 2012-04-26 11:25:13 +0200 |
|---|---|---|
| committer | antirez <antirez@gmail.com> | 2012-04-26 11:25:13 +0200 |
| commit | 28ccb53008eed402999d85aa0ac66714b9f5bd03 (patch) | |
| tree | e122132a946a1f9b5836a97aa45d27accbb232dd /tests/support/test.tcl | |
| parent | 57356b80cddd203086e932a09a8916a925cb8cf6 (diff) | |
| download | redis-28ccb53008eed402999d85aa0ac66714b9f5bd03.tar.gz | |
Redis test: More reliable BRPOPLPUSH replication test.
Now it uses the new wait_for_condition testing primitive.
Also wait_for_condition implementation was fixed in this commit to properly
escape the expr command and its argument.
Diffstat (limited to 'tests/support/test.tcl')
| -rw-r--r-- | tests/support/test.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/support/test.tcl b/tests/support/test.tcl index 91ab8117b..480c674e0 100644 --- a/tests/support/test.tcl +++ b/tests/support/test.tcl @@ -53,7 +53,7 @@ proc assert_type {type key} { # executed. proc wait_for_condition {maxtries delay e _else_ elsescript} { while {[incr maxtries -1] >= 0} { - if {[uplevel 1 expr $e]} break + if {[uplevel 1 [list expr $e]]} break after $delay } if {$maxtries == -1} { |