diff --git a/tests/cluster/tests/00-base.tcl b/tests/cluster/tests/00-base.tcl index e3b88e3e..cf2a7644 100644 --- a/tests/cluster/tests/00-base.tcl +++ b/tests/cluster/tests/00-base.tcl @@ -8,9 +8,23 @@ if {$::simulate_error} { } } -test "Cluster nodes are reachable." { +test "Cluster nodes are reachable" { foreach_redis_id id { # Every node should just know itself. assert {[R $id ping] eq {PONG}} } } + +test "Different nodes have different IDs" { + set ids {} + set numnodes 0 + foreach_redis_id id { + incr numnodes + # Every node should just know itself. + set nodeid [dict get [get_myself $id] id] + assert {$nodeid ne {}} + lappend ids $nodeid + } + set numids [llength [lsort -unique $ids]] + assert {$numids == $numnodes} +}