Bit operations tests improved.

[redis.git] / tests / unit / limits.tcl

diff --git a/tests/unit/limits.tcl b/tests/unit/limits.tcl
index 9988983fad75e7f808663f64cc3b44259935d2f9..b37ea9b0f5b37efef1c47429d204b38d595e7202 100644 (file)
--- a/tests/unit/limits.tcl
+++ b/tests/unit/limits.tcl
@@ -2,9 +2,12 @@ start_server {tags {"limits"} overrides {maxclients 10}} {
     test {Check if maxclients works refusing connections} {
         set c 0
         catch {
-            while 1 {
+            while {$c < 50} {
                 incr c
-                redis_deferring_client
+                set rd [redis_deferring_client]
+                $rd ping
+                $rd read
+                after 100
             }
         } e
         assert {$c > 8 && $c <= 10}