anchor.diff:  handle_call(fetch_errors, _From, State) ->
       {reply, State#state.errors, State};
   handle_call(info, From, State) ->
  -    spawn_link(fun() ->
  -        ErrorCount = dict:size(State#state.errors),
  -        RetardsCount = length(State#state.retards),
  -        UpstreamCount = dict:size(State#state.upstream),
  -        TbdCount = dict:size(State#state.tbd),
  -        Info = [
  -            {errors, ErrorCount},
  -            {retards, RetardsCount},
  -            {upstream, UpstreamCount},
  -            {tbd, TbdCount}
  -        ],
  -        gen_server:reply(From, Info)
  +    spawn(fun() ->
  +        gen_server:reply(From, [
  +            {errors, dict:size(State#state.errors)},
  +            {retards, length(State#state.retards)},
  +            {upstream, dict:size(State#state.upstream)},
  +            {tbd, dict:size(State#state.tbd)}
  +        ])
       end),
       {noreply, State};
   handle_call(_Req, _From, State) ->
  
positive.code:     NewErrors = dict:store({BaseUrl, AuthorAndModule, Version}, {At, {ErrorType, Reason, StackTrace}}, State#state.errors),
      {noreply, State#state{ tbd = NewTbd, errors = NewErrors}};
  
  handle_info({'EXIT', _Pid, _Reason}, State) ->
      self() ! tick,
      {noreply, State};
  
  handle_info(Msg, State) ->
      {noreply, State}.
  
negative.code: 
  -define(TICK_INTERVAL_MILLIS, 10000).
  -define(REFRESH_INTERVAL_MICROS, 60 * 60* 1000* 1000 * 1000).
  -record(state, { pids=[], retards =[], upstream = dict:new(), tbd = dict:new(), errors = dict:new() }).
  
  -compile(export_all).
  % -----------------------------------------------------------------------------
  