diff options
Diffstat (limited to 'tests/instances.tcl')
-rw-r--r-- | tests/instances.tcl | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/instances.tcl b/tests/instances.tcl index 2a3336b78..52e61418e 100644 --- a/tests/instances.tcl +++ b/tests/instances.tcl @@ -677,9 +677,19 @@ proc redis_deferring_client {type id} { return $client } +proc redis_deferring_client_by_addr {host port} { + set client [redis $host $port 1 $::tls] + return $client +} + proc redis_client {type id} { set port [get_instance_attrib $type $id port] set host [get_instance_attrib $type $id host] set client [redis $host $port 0 $::tls] return $client } + +proc redis_client_by_addr {host port} { + set client [redis $host $port 0 $::tls] + return $client +}
\ No newline at end of file |