anchor.diff:  handle_call({del, Name, Pid}, _From, State) ->
       unregister(Name, Pid),
       {reply, ok, State};
  +
  +handle_call(stop, _from, State) ->
  +    {stop, normal, ok, State};
   
   handle_call(Msg, _From, State) ->
       lager:error("Module ~p received unexpected call ~p", [?MODULE, Msg]),
  
positive.code: %% @private
  start_link() -> 
      gen_server:start_link({local, ?MODULE}, ?MODULE, [], []).
          
  %% @private
  init([]) ->
  
negative.code:     {setup, 
          fun() -> 
              ?debugFmt("Starting ~p", [?MODULE]),
              case start_link() of
                  {error, {already_started, _}} ->
                      ok;
                  {ok, _} ->
                      do_stop
              end
          end,
          fun(Stop) -> 
              case Stop of
                  do_stop -> stop();
                  ok -> ok
              end
          end,
          [
              fun test_count/0,
  