X-Git-Url: https://git.saurik.com/redis.git/blobdiff_plain/da33edbc58282eed2d48ccb62babf39d0cb748e7..0f51e3c5640c2f5be2766f10660f668bc71c7dd9:/tests/test_helper.tcl?ds=inline diff --git a/tests/test_helper.tcl b/tests/test_helper.tcl index 459784cd..7978d8a4 100644 --- a/tests/test_helper.tcl +++ b/tests/test_helper.tcl @@ -29,11 +29,16 @@ set ::all_tests { integration/replication integration/replication-2 integration/replication-3 + integration/replication-4 integration/aof + integration/rdb + integration/convert-zipmap-hash-on-load unit/pubsub unit/slowlog unit/scripting unit/maxmemory + unit/introspection + unit/obuf-limits } # Index to the next test to run in the ::all_tests list. set ::next_test 0 @@ -114,7 +119,7 @@ proc reconnect {args} { } # re-set $srv in the servers list - set ::servers [lreplace $::servers end+$level 1 $srv] + lset ::servers end+$level $srv } proc redis_deferring_client {args} {