anchor.diff:  -spec on(comm:message() | comm:group_message(), user_state(), gc_state())
           -> ok.
   on(GCMsg, UState, GCState)
  -  when is_tuple(GCMsg)
  -       andalso '$gen_component' =:= element(1, GCMsg) ->
  +  when is_tuple(GCMsg) andalso '$gen_component' =:= element(1, GCMsg) ->
       on_gc_msg(GCMsg, UState, GCState);
  -on({ping, Pid}, UState, GCState) ->
  -    %% handle failure detector messages
  -    comm:send(Pid, {pong, pid_groups:my_pidname()}, [{channel, prio}]),
  -    loop(UState, GCState);
  -on({?send_to_group_member, Processname, Msg}, UState, GCState) ->
  -    %% forward a message to group member by its process name
  -    %% initiated via comm:send/3 with group_member
  -    Pid = pid_groups:get_my(Processname),
  -    case Pid of
  -        failed -> ok;
  -        _      -> comm:send_local(Pid, Msg)
  -    end,
  -    loop(UState, GCState);
   on(Msg, UState, GCState) ->
       T1GCState = on_bp(Msg, UState, GCState),
       case T1GCState of
  
positive.code:             %% end
      end.
  
  
  %%%%%%%%%%%%%%%%%%%%
  %% Attention!:
  
negative.code:         _ ->
              Module  = gc_mod(T1GCState),
              Handler = gc_hand(T1GCState),
              try handle_message(Msg, UState, Handler) of
                  kill ->
                      log:log(info, "[ gen_component ] ~.0p killed (~.0p:~.0p/2):",
                              [self(), Module, Handler]),
  