anchor.diff:  -export([create_two_adjacent_leases/0]).
   -export([create_lease/2]).
   
  -%
  --export([get_renewal_counter/0]).
  +% public api
  +-export([get_renewal_counter/0, get_lease_list/0]).
   
   -record(mock_state, {
             renewal_enabled      = ?required(mock_state, renewal_enabled     ) :: boolean(),
  
positive.code:     ct:pal("mock leases~n~w~n~w~n", [L1, L2]),
      {L1, L2}.
  
  -spec create_lease(?RT:key(), ?RT:key()) -> {l_on_cseq:lease_t(), l_on_cseq:lease_t()}.
  create_lease(From, To) ->
      L = l_on_cseq:unittest_create_lease_with_range(From, To),
      Range = node:mk_interval_between_ids(From, To),
  
negative.code:                      get_renewal_counter(MockState)}),
      {State, MockState};
  
  % get lease list
  on({get_lease_list, Pid}, {State, MockState}) ->
      comm:send_local(Pid,
                      {get_lease_list_response,
                       dht_node_state:get(State, lease_list)}),
      {State, MockState};
  
  % intercept renews
  on({l_on_cseq, renew, _OldLease, _Mode} = Msg,
     {State, MockState}) ->
  