anchor.diff:      {Pid,Rest} = parse_link(Str,[]),
       {{Pid,Pid},Rest}.
   
  +parse_monitor("{"++Str) ->
  +    %% Named process
  +    {Name,Node,Rest1} = parse_name_node(Str,[]),
  +    Pid = get_pid_from_name(Name,Node),
  +    case parse_link(string:strip(Rest1,left,$,),[]) of
  +	{Ref,"}"++Rest2} ->
  +	    %% Bug in break.c - prints an extra "}" for remote
  +	    %% nodes... thus the strip
  +	    {{Pid,"{"++Name++","++Node++"} ("++Ref++")"},
  +	     string:strip(Rest2,left,$})};
  +	{Ref,[]} ->
  +	    {{Pid,"{"++Name++","++Node++"} ("++Ref++")"},[]}
  +    end;
   parse_monitor(Str) ->
       case parse_link(Str,[]) of
   	{Pid,","++Rest1} ->
  
positive.code: 		      "Some information might be missing."];
  	     false -> []
  	 end,
      {reply,{ok,GenInfo,TW},State#state{wordsize=WS, num_atoms=NumAtoms}};
  handle_call({expand_binary,{Offset,Size,Pos}},_From,State=#state{file=File}) ->
      Fd = open(File),
  
negative.code: 		N;
  	    [] ->
  		case lookup_index(?no_distribution) of
  		    [_] -> "'nonode@nohost'";
  		    [] -> "unknown"
  		end
  	end,
  