summaryrefslogtreecommitdiffstats
path: root/tests/sentinel/tests/14-debug-command.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'tests/sentinel/tests/14-debug-command.tcl')
-rw-r--r--tests/sentinel/tests/14-debug-command.tcl9
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/sentinel/tests/14-debug-command.tcl b/tests/sentinel/tests/14-debug-command.tcl
new file mode 100644
index 0000000..dccb992
--- /dev/null
+++ b/tests/sentinel/tests/14-debug-command.tcl
@@ -0,0 +1,9 @@
+source "../tests/includes/init-tests.tcl"
+
+test "Sentinel debug test with arguments and without argument" {
+ set current_info_period [lindex [S 0 SENTINEL DEBUG] 1]
+ S 0 SENTINEL DEBUG info-period 8888
+ assert_equal {8888} [lindex [S 0 SENTINEL DEBUG] 1]
+ S 0 SENTINEL DEBUG info-period $current_info_period
+ assert_equal $current_info_period [lindex [S 0 SENTINEL DEBUG] 1]
+}