Commit ba2edc41 authored by antirez's avatar antirez
Browse files

Sentinel: instance_is_killed proc added to sentinel.tcl.

parent 9c2063fb
......@@ -356,6 +356,12 @@ proc kill_instance {type id} {
set ::pids [lsearch -all -inline -not -exact $::pids $pid]
}
# Return true of the instance of the specified type/id is killed.
proc instance_is_killed {type id} {
set pid [get_instance_attrib $type $id pid]
return $pid == -1
}
# Restart an instance previously killed by kill_instance
proc restart_instance {type id} {
set dirname "${type}_${id}"
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment