anchor.diff:       get_process_info(self(), registered_name),         
        {error_info, {Class,Reason,Stacktrace}},
        get_ancestors(self()),        
  -     get_process_info(self(), messages),
  +     get_process_info(self(), message_queue_len),
  +     get_messages(self()),
        get_process_info(self(), links),
        get_cleaned_dictionary(self()),
        get_process_info(self(), trap_exit),
  
positive.code: make_neighbour_reports1([]) ->
    [].
    
  make_neighbour_report(Pid) ->
    [{pid, Pid},
     get_process_info(Pid, registered_name),          
     get_initial_call(Pid),
     get_process_info(Pid, current_function),
     get_ancestors(Pid),
     get_process_info(Pid, messages),
     get_process_info(Pid, links),
     get_cleaned_dictionary(Pid),
     get_process_info(Pid, trap_exit),
     get_process_info(Pid, status),
     get_process_info(Pid, heap_size),
  
negative.code:     [EI, lib:format_exception(1+length(EI), Class, Reason, 
                                StackTrace, StackFun, PF, Enc), "\n"].
  
  format_mfa(Indent, {M,F,Args}=StartF, Extra) ->
      try
  	A = length(Args),
  	[Indent,"initial call: ",atom_to_list(M),$:,atom_to_list(F),$/,
  	 integer_to_list(A),"\n"]
      catch
  	error:_ ->
  	    format_tag(Indent, initial_call, StartF, Extra)
      end.
  
  pp_fun({Enc,Depth}) ->
  