anchor.diff:  		N;
   	    [] ->
   		case lookup_index(?no_distribution) of
  -		    [_] -> "nonode@nohost";
  +		    [_] -> "'nonode@nohost'";
   		    [] -> "unknown"
   		end
   	end,
  
positive.code:     {Pid,Rest} = parse_link(Str,[]),
      {{Pid,Pid},Rest}.
  
  parse_monitor(Str) ->
      case parse_link(Str,[]) of
  	{Pid,","++Rest1} ->
  
negative.code: parse_link([],Acc) ->
      %% truncated
      {lists:reverse(Acc),[]}.
  
  parse_name_node(","++Rest,Name) ->
      parse_name_node(Rest,Name,[]);
  parse_name_node([H|T],Name) ->
      parse_name_node(T,[H|Name]);
  parse_name_node([],Name) ->
      %% truncated
      {lists:reverse(Name),[],[]}.
  
  parse_name_node("}"++Rest,Name,Node) ->
      {lists:reverse(Name),lists:reverse(Node),Rest};
  parse_name_node([H|T],Name,Node) ->
      parse_name_node(T,Name,[H|Node]);
  parse_name_node([],Name,Node) ->
      %% truncated
      {lists:reverse(Name),lists:reverse(Node),[]}.
  
  get_pid_from_name(Name,Node) ->
      case ets:lookup(cdv_reg_proc_table,cdv_dump_node_name) of
  	[{_,Node}] ->
  	    case ets:lookup(cdv_reg_proc_table,Name) of
  		[{_,Pid}] when is_pid(Pid) ->
  		    pid_to_list(Pid);
  		_ ->
  		    "<unkonwn_pid>"
  	    end;
  	_ ->
  	    "<unknown_pid_other_node>"
      end.
  
  maybe_other_node(Id) ->
      Channel = 
  