anchor.diff:  keys(_, _) ->
       [{listen, accept}].
   
  -peer_dict(#state{watchdogT = WatchdogT, peerT = PeerT}, Dict0) ->
  +peer_dict(#state{watchdogT = WatchdogT, local = {PeerT, _, _}}, Dict0) ->
       try ets:tab2list(WatchdogT) of
           L -> lists:foldl(fun(T,A) -> peer_acc(PeerT, A, T) end, Dict0, L)
       catch
  
positive.code:   when Type == connect;
         Type == listen ->
      {S, [T | Acc]}.
  
  service_options(Opts) ->
      [{sequence, proplists:get_value(sequence, Opts, ?NOMASK)},
  
negative.code: %% # share_peers/2
  %% ---------------------------------------------------------------------------
  
  share_peers(Pid, #state{options = [_, {_,SP} | _],
                          local = {PeerT, AppT, _}}) ->
      is_remote(Pid, SP)
          andalso ets:foldl(fun(T, N) -> N + sp(Pid, AppT, T) end,
                            0,
                            PeerT).
  
  %% An entry in the peer table doesn't mean the watchdog state is OKAY,
  %% an entry in the app table does.
  
  sp(Pid, AppT, #peer{pid = TPid,
                      apps = [{_, Alias} | _] = Apps,
                      caps = Caps}) ->
      Spec = [{{'$1', TPid},
               [{'==', '$1', {const, Alias}}],
               ['$_']}],
      case ets:select(AppT, Spec, 1) of
          '$end_of_table' ->
              0;
          _ ->
              Pid ! {peer, TPid, [A || {_,A} <- Apps], Caps},
              1
      end.
  
  is_remote(Pid, T) ->
      Node = node(Pid),
  