anchor.diff:      
   loop(Parent, Name, {SrvrState, ClntState} = State, Mod, Time, Debug, Hib) ->
       Category = bugnutz,
  -    ProcessAll = false,
  +    ProcessAll = true,
  +    DefaultBehav = false,
       {RFrom, RprtMsg, Reply} = receive
                       %% system
                   {system, From, Req} = M                 ->
                       sys:handle_system_msg(Req, From, Parent, ?MODULE, Debug, [Name, State, Mod, Time], Hib),
  -                    {undefined, M, system}
  +                    {undefined, M, idle}
               ;   {'EXIT', Parent, Reason} = M            ->
                       terminate(Reason, Name, M, Mod, ClntState, Debug)
               
                       %% gen_call
               ;   {'$gen_call', From, Msg}                -> {From, Msg, catch Mod:handle_call(Msg, From, ClntState)}
               ;   {{'$gen_call', always}, From, Msg}      -> {From, Msg, catch Mod:handle_call(Msg, From, ClntState)}
  +            ;   {{'$gen_call', _}, From, Msg} when DefaultBehav -> {From, Msg, catch Mod:handle_call(Msg, From, ClntState)}
               ;   {{'$gen_call', Category}, From, Msg}    -> {From, Msg, catch Mod:handle_call(Msg, From, ClntState)}
               
                       %% gen_cast
               ;   {'$gen_cast', Msg}                      -> {undefined, Msg, Mod:handle_cast(Msg, ClntState)}
               ;   {'$gen_cast', always, Msg}              -> {undefined, Msg, Mod:handle_cast(Msg, ClntState)}
  +            ;   {'$gen_cast', _, Msg} when DefaultBehav -> {undefined, Msg, Mod:handle_cast(Msg, ClntState)}
               ;   {'$gen_cast', Category, Msg}            -> {undefined, Msg, Mod:handle_cast(Msg, ClntState)}
               
                       %% common system info
  
positive.code:             end,
              
      case Reply of
          system -> ok
          
              %% gen_call
      ;   {reply, Reply, NState} when RFrom =/= undefined ->
  
negative.code:     loop(Parent, Name, State, Mod, hibernate, Debug, true).
  
  
  handle_debug([], _Fun, _Name, _Msg) -> [];
  handle_debug(Debug, Fun, Name, Msg) ->
  	sys:handle_debug(Debug, Fun, Name, Msg).
  	
      
  debug_reply(_Name, From, Reply, _State, []) ->
      reply(From, Reply),
      [];    
  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
  