1
0

bg_complex_data.tcl 361 B

12345678910111213
  1. source tests/support/redis.tcl
  2. source tests/support/util.tcl
  3. set ::tlsdir "tests/tls"
  4. proc bg_complex_data {host port db ops tls} {
  5. set r [redis $host $port 0 $tls]
  6. $r client setname LOAD_HANDLER
  7. $r select $db
  8. createComplexDataset $r $ops
  9. }
  10. bg_complex_data [lindex $argv 0] [lindex $argv 1] [lindex $argv 2] [lindex $argv 3] [lindex $argv 4]