anchor.diff:  %%    4. The ticker process.
   %%   (5. Garbage pid.)
   %%
  -%% The process type function that handled the process throws 
  +%% The process type function that handled the process throws
   %% the handle_info return value !
   %% -----------------------------------------------------------
   
  
positive.code: %% #tick_change{} record if the ticker process has been upgraded;
  %% otherwise, an integer or an atom.
  
  handle_call(ticktime, _, #state{tick = #tick{time = T}} = State) ->
      {reply, T, State};
  handle_call(ticktime, _, #state{tick = #tick_change{time = T}} = State) ->
      {reply, {ongoing_change_to, T}, State};
  
  handle_call({new_ticktime,T,_TP}, _, #state{tick = #tick{time = T}} = State) ->
      ?tckr_dbg(no_tick_change),
      {reply, unchanged, State};
  
  handle_call({new_ticktime,T,TP}, _, #state{tick = #tick{ticker = Tckr,
  							time = OT}} = State) ->
      ?tckr_dbg(initiating_tick_change),
      start_aux_ticker(T, OT, TP),
  
negative.code:     reply_waiting1(lists:reverse(Waiting), Rep).
  
  reply_waiting1([From|W], Rep) ->
      async_gen_server_reply(From, Rep),
      reply_waiting1(W, Rep);
  reply_waiting1([], _) ->
      ok.
  