anchor.diff:  %% Internal.
   %%------------------------------------------------------------------------------------------------
   
  -% Internal functions should be here.
  -
  +remove_xnest(Pid) ->
  +	case ets:lookup(?PID_INDEX, Pid) of
  +		[{_XNest, XNestName}] ->
  +			ets:delete(?TAB, XNestName),
  +			ets:delete(?PID_INDEX, Pid);
  +		_ -> ok
  +	end
  
positive.code: 	{noreply, State}.
  
  %% @private
  handle_info({'DOWN', MonitorRef, process, _Pid, _}, State=#state{monitors=Monitors}) ->
  	{_, XNestName} = lists:keyfind(MonitorRef, 1, Monitors),
  	true = ets:delete(?TAB, XNestName),
  	NewMonitors = lists:keydelete(MonitorRef, 1, Monitors),
  	{noreply, State#state{monitors=NewMonitors}};
  handle_info(_Info, State) ->
  	{noreply, State}.
  
  %% @private
  terminate(_Reason, _State) ->
  	ok.
  
  %% @private
  
negative.code: 
  
  -define(TAB, ?MODULE).
  -define(PID_INDEX, pid_to_name).
  
  -record(state, {
  }).
  
  %%------------------------------------------------------------------------------------------------
  