anchor.diff:          end,
           ets:insert(?MODULE, {{Key, Rate}, NewAgg})
       end, ets:tab2list(?MODULE)),
  -    {reply, ok, State}.
  +    {reply, ok, {TRef, SampleInterval}}.
   
   handle_cast(stop, State) ->
       {stop, normal, State}.
  
positive.code:     to_json_term(?MODULE:get(Key, Time)).
  
  collect_sample() ->
      gen_server:call(?MODULE, collect_sample).
  
  
  init(StatDescsFileName) ->
  
negative.code:     
      Rate = list_to_integer(couch_config:get("stats", "rate", "1000")),
      % TODO: Add timer_start to kernel start options.
      {ok, TRef} = timer:apply_after(Rate, ?MODULE, collect_sample, []),
      {ok, {TRef, Rate}}.
      
  terminate(_Reason, {TRef, _Rate}) ->
      timer:cancel(TRef),
      ok.
  
  handle_call(collect_sample, _, {_TRef, SampleInterval}) ->
      {ok, TRef} = timer:apply_after(SampleInterval, ?MODULE, collect_sample, []),
      % Gather new stats values to add.
      Incs = lists:map(fun({Key, Value}) ->
          {Key, {incremental, Value}}
  