summaryrefslogtreecommitdiff
path: root/examples/redis-unstable/tests/cluster/run.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'examples/redis-unstable/tests/cluster/run.tcl')
-rw-r--r--examples/redis-unstable/tests/cluster/run.tcl37
1 files changed, 0 insertions, 37 deletions
diff --git a/examples/redis-unstable/tests/cluster/run.tcl b/examples/redis-unstable/tests/cluster/run.tcl
deleted file mode 100644
index 1deb9e2..0000000
--- a/examples/redis-unstable/tests/cluster/run.tcl
+++ /dev/null
@@ -1,37 +0,0 @@
-# Cluster test suite.
-#
-# Copyright (C) 2014-Present, Redis Ltd.
-# All Rights reserved.
-#
-# Licensed under your choice of (a) the Redis Source Available License 2.0
-# (RSALv2); or (b) the Server Side Public License v1 (SSPLv1); or (c) the
-# GNU Affero General Public License v3 (AGPLv3).
-
-cd tests/cluster
-source cluster.tcl
-source ../instances.tcl
-source ../../support/cluster.tcl ; # Redis Cluster client.
-
-set ::instances_count 20 ; # How many instances we use at max.
-set ::tlsdir "../../tls"
-
-proc main {} {
- parse_options
- spawn_instance redis $::redis_base_port $::instances_count {
- "cluster-enabled yes"
- "appendonly yes"
- "enable-protected-configs yes"
- "enable-debug-command yes"
- "save ''"
- }
- run_tests
- cleanup
- end_tests
-}
-
-if {[catch main e]} {
- puts $::errorInfo
- if {$::pause_on_error} pause_on_error
- cleanup
- exit 1
-}