anchor.diff:  % don't know the node id of a node.
   %
   safe_insert_node(IP, Port) ->
  -    case etorrent_dht_net:ping(IP, Port) of
  +    case unsafe_ping(IP, Port) of
           pang -> {error, timeout};
           ID   -> unsafe_insert_node(ID, IP, Port)
       end.
  
positive.code: init([StateFile]) ->
      % Initialize the table of unreachable nodes when the server is started.
      % The safe_ping and unsafe_ping functions aren't exported outside of
      % of this module so they should fail unless the server is running.
      _ = case ets:info(unreachable_tab()) of
          undefined ->
              ets:new(unreachable_tab(), [named_table, public, bag]);
  
negative.code: 
  inactive_nodes(Nodes, Timeout, Timers) ->
      [N || N <- Nodes, has_timed_out(N, Timeout, Timers)].
  
  active_nodes(Nodes, Timeout, Timers) ->
      [N || N <- Nodes, not has_timed_out(N, Timeout, Timers)].
  
  timer_tree() ->
      gb_trees:empty().
  