anchor.diff:              {stop, shutdown, State}
       end.
   
  -start_watching(Name) ->
  -    watching(start_watching, Name).
  -
  -stop_watching(Name) ->
  -    watching(stop_watching, Name).
  -
  -
  +
  +%%%
  +%%% State machine internals
  +%%%
   up(current_state, _From, State) ->
       {reply, up, up, State}.
   
  
positive.code: status_to_atom(<<"restarting">>) ->
      restarting.
  
  reset_timer(#state{dead_interval=Interval, tref=undefined}=State) ->
      TRef = erlang:send_after(Interval, self(), no_heartbeats),
      State#state{tref=TRef};
  
negative.code:         _ -> ok
      end.
  
  -spec current_state(node_name()) -> any().
  current_state(Name) ->
      case catch gproc:lookup_pid({n,l,Name}) of
          {'EXIT', _} ->
  