anchor.diff:              end,
               
       case Reply of
  -        system -> ok
  +        idle ->
  +			loop(Parent, Name, State, Mod, Time, Debug, Hib)
           
               %% gen_call
       ;   {reply, Reply, NState} when RFrom =/= undefined ->
  
positive.code:     loop(Parent, Name, State, Mod, hibernate, Debug, true).
  
  
      
  debug_reply(_Name, From, Reply, _State, []) ->
      reply(From, Reply),
      [];    
  debug_reply(Name, From, Reply, State, Debug) ->
      reply(Name, From, Reply, State, Debug).
      
  reply(Name, {To, Tag}, Reply, State, Debug) ->
      reply({To, Tag}, Reply),
      sys:handle_debug(Debug, fun print_event/3, Name,
              {out, Reply, To, State} ).
  
     
  %%% ---------------------------------------------------
  %%% Send/receive functions
  
negative.code: %%%  API
  %%%=========================================================================
  
  -type server_cmd() :: {clear} | {reset, atom()} | {pop} | {push, atom()}.
      
  -type noreply_type() ::
          {noreply, NewState :: term()} |
  