anchor.diff:      {priv_dir, PrivDir} = lists:keyfind(priv_dir, 1, Config),
       %% write data
       _ = [kv_on_cseq:write(integer_to_list(X),X) || X <- lists:seq(1, 100)],
  +    %% check ring
  +    lease_checker2:wait_for_clean_leases(500, config:read(replication_factor)),
       %% hook into merge-protocol
       [gen_component:bp_set_cond(Pid, block(self(), MsgTag),
                                  block)
  
positive.code:                                                   {leases, true},
                                                    {db_backend, db_mnesia},
                                                    {start_type, recover}]}]),
      lease_checker2:wait_for_clean_leases(500, 4),
      %% ring restored -> checking KV data integrity
      _ = check_data_integrity(),
      true.
  
negative.code: 
  groups() ->
      [{slide_tests, [sequence], [
                                  half_join_and_recover_after_step2,
                                  half_join_and_recover_after_step3,
                                  half_join_and_recover_after_step4
                                 ]},
       {leave_tests, [sequence], [
                                  %% half_leave_and_recover_after_step1,
                                  %% half_leave_and_recover_after_step2,
                                  half_leave_and_recover_after_step3,
                                  half_leave_and_recover_after_step4
                                 ]},
       {repeater, [{repeat, 10}], [{group, slide_tests}, {group, leave_tests}]}
      ].
  
  all() -> [
            {group, slide_tests},
            {group, leave_tests}
           ].
  
  