anchor.diff:  tester_type_check_slide_leases(_Config) ->
       Count = 1000,
       config:write(no_print_ring_data, true),
  -    tester:register_value_creator({typedef, dht_node_state, state}, slide_leases, tester_create_dht_node_state, 0),
  +    %tester:register_value_creator({typedef, dht_node_state, state}, slide_leases, tester_create_dht_node_state, 0),
  +    %tester:register_value_creator({typedef, dht_node_state, state}, slide_leases, tester_create_slide_ops, 0),
       %% [{modulename, [excludelist = {fun, arity}]}]
       Modules =
           [ {slide_leases,
              [
  +            {prepare_join_send, 2},
               {prepare_rcv_data, 2},
               {prepare_send_data1, 3},
               {prepare_send_data2, 3},
  
positive.code:         {get_state_response, Data} ->
              Data
      end.
  
negative.code:     pid_groups:join(pid_groups:group_with(dht_node)),
      _ = [ tester:type_check_module(Mod, Excl, ExclPriv, Count)
            || {Mod, Excl, ExclPriv} <- Modules ],
      %tester:unregister_value_creator( TODO ),
      true.
  
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  