anchor.diff:        {"Expired cache, re-calculate",
          fun get_expired/0},
         {"Only a single process can calculate stats",
  -       fun serialize_calls/0}
  -     ]}.
  +       fun serialize_calls/0},
  +      {"Crash test",
  +       fun crasher/0}
  +      ]}.
   
   register() ->
       [meck:expect(M, produce_stats, fun() -> ?STATS end)
  
positive.code:                        Stats = folsom_metrics:histogram_timed_update({?MODULE, M}, M, F, A),
                         folsom_metrics:notify_existing_metric({?MODULE, App}, 1, meter),
                         gen_server:cast(?MODULE, {stats, App, Stats, folsom_utils:now_epoch()}) end).
  
  -ifdef(TEST).
  
  
negative.code:     %% if a get stats is not under way start one
      Awaiting = case orddict:find(App, Active) of
                     error ->
                        Pid = do_get_stats(App, {M, F, A}),
                         {Pid, [From]};
                     {ok, {Pid, Froms}} ->
                         {Pid, [From|Froms]}
                 end,
      orddict:store(App, Awaiting, Active).
  
  