diff options
Diffstat (limited to 'tests/cluster/cluster.tcl')
| -rw-r--r-- | tests/cluster/cluster.tcl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/cluster/cluster.tcl b/tests/cluster/cluster.tcl index e894823de..ffb268561 100644 --- a/tests/cluster/cluster.tcl +++ b/tests/cluster/cluster.tcl @@ -57,6 +57,11 @@ proc CI {n field} { get_info_field [R $n cluster info] $field } +# Return the value of the specified INFO field. +proc s {n field} { + get_info_field [R $n info] $field +} + # Assuming nodes are reest, this function performs slots allocation. # Only the first 'n' nodes are used. proc cluster_allocate_slots {n} { |