anchor.diff:      init_gossip_tasks(State),
   
       % set range and notify cb modules about leader state
  -    set_range(MyRange, State),
  +    state_set(range, MyRange, State),
       Msg1 = case is_leader(MyRange) of
           true -> {is_leader, MyRange};
           false -> {no_leader, MyRange}
       end,
  -    Fun = fun (CBModule) -> cb_call(notify_change, [leader, Msg1], Msg, CBModule, State) end,
  -    CBModules = get_cbmodules(State),
  +    List = [leader, Msg1],
  +    Fun = fun (CBModule) -> cb_call(notify_change, List, Msg, CBModule, State) end,
  +    CBModules = state_get(cb_modules, State),
       lists:foreach(Fun, CBModules),
   
       % change handler to on_active
  
positive.code:     case cb_call(select_reply_data, [PData, Ref, RoundStatus, Round], Msg, CBModule, State) of
          ok -> ok;
          discard_msg ->
              take_reply_peer(Ref, State), ok;
          send_back ->
              take_reply_peer(Ref, State), ok
      end.
  
  
  
negative.code: 
  
  on_active({integrated_data, CBModule, current_round}, State) ->
      state_update(cycles, fun (X) -> X+1 end, CBModule, State),
      State;
  
  
  