regression test for bug 593 added

2025-03-18 00:20:50 +00:00 · 2011-09-12 10:53:49 +02:00 · 2011-09-12 10:53:49 +02:00 · 7551e23716
commit 7551e23716
parent 48082cc044
1 changed files with 14 additions and 0 deletions
--- a/tests/unit/type/list.tcl
+++ b/tests/unit/type/list.tcl
@ -728,4 +728,18 @@ start_server {
            assert_equal 3 [r llen myotherlist]
        }
    }
+
+    test "Regression for bug 593 - chaining BRPOPLPUSH with other blocking cmds" {
+        set rd1 [redis_deferring_client]
+        set rd2 [redis_deferring_client]
+
+        $rd1 brpoplpush a b 0
+        $rd1 brpoplpush a b 0
+        $rd2 brpoplpush b c 0
+        after 1000
+        r lpush a data
+        $rd1 close
+        $rd2 close
+        r ping
+    } {PONG}
 }