From: antirez Date: Thu, 29 Nov 2012 15:12:14 +0000 (+0100) Subject: Make an EXEC test more latency proof. X-Git-Url: https://git.saurik.com/redis.git/commitdiff_plain/ed709555102db9e54ec9af6695da82acea3c5b31 Make an EXEC test more latency proof. --- diff --git a/tests/unit/multi.tcl b/tests/unit/multi.tcl index 6f44767b..f7a1f646 100644 --- a/tests/unit/multi.tcl +++ b/tests/unit/multi.tcl @@ -63,13 +63,13 @@ start_server {tags {"multi"}} { r multi r set foo1 bar1 $rd config set maxmemory 1 + assert {[$rd read] eq {OK}} catch {r lpush mylist myvalue} $rd config set maxmemory 0 + assert {[$rd read] eq {OK}} r set foo2 bar2 catch {r exec} e assert_match {EXECABORT*} $e - assert {[$rd read] eq {OK}} - assert {[$rd read] eq {OK}} $rd close list [r exists foo1] [r exists foo2] } {0 0}