From 22c9c4076baec3d14b16421ab3b7fe830479fbac Mon Sep 17 00:00:00 2001
From: antirez <antirez@gmail.com>
Date: Fri, 30 Mar 2012 10:26:07 +0200
Subject: Regression test for issue 417 (memory leak when replicating to DB
 with id >= 10)

---
 tests/helpers/bg_complex_data.tcl | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 tests/helpers/bg_complex_data.tcl

(limited to 'tests/helpers')

diff --git a/tests/helpers/bg_complex_data.tcl b/tests/helpers/bg_complex_data.tcl
new file mode 100644
index 000000000..dffd7c668
--- /dev/null
+++ b/tests/helpers/bg_complex_data.tcl
@@ -0,0 +1,10 @@
+source tests/support/redis.tcl
+source tests/support/util.tcl
+
+proc bg_complex_data {host port db ops} {
+    set r [redis $host $port]
+    $r select $db
+    createComplexDataset $r $ops
+}
+
+bg_complex_data [lindex $argv 0] [lindex $argv 1] [lindex $argv 2] [lindex $argv 3]
-- 
cgit v1.2.1