anchor.diff:           send_after/4,
            start_timer/4,
            cancel/2,
  -         fire_now/1,
  -         fire_later/1]).
  +         step/1,
  +         fire/1]).
   
   %% gen_server callbacks
   -export([init/1,
  
positive.code: start_timer(Server, Time, Dest, Msg) ->
      case Server of
          native -> erlang:start_timer(Time, Dest, Msg);
          Server -> gen_server:call(Server, {start_timer, Time, Dest, Msg})
      end.
  
  
  
negative.code:         message=Msg},
      case Mode of
          instant ->
              deliver(Timer),
              {reply, Ref, State};
          queue ->
              NewTimers = sort_timers([Timer|Timers]),
  