anchor.diff:      {ok, #state{}}.
   
   init([]) ->
  +    process_flag(trap_exit, true),
       process_flag(priority, high),
       ets:new(nklib_proc_store, [public, named_table]),
       ets:new(nklib_proc_pids, [public, named_table]),
  
positive.code: insert_pid(Pid, Type, Name) ->
      case ets:lookup(nklib_proc_pids, Pid) of
          [] -> 
              Mon = monitor(process, Pid),
              ets:insert(nklib_proc_pids, {Pid, Mon, [{Type, Name}]});
          [{Pid, Mon, PidItems}] ->
              case lists:member({Type, Name}, PidItems) of
  
negative.code:     {noreply, #state{}}.
  
  handle_info({'DOWN', _Ref, process, Pid, _Reason}, State) ->
      unregister_all(Pid),
      {noreply, State};
  
  handle_info({'EXIT', Pid, _Reason}, State) ->
      unregister_all(Pid),
      {noreply, State};
  
  