anchor.diff:                                               }),
                   %% retry the read in a higher round...
                   %% TODO more intelligent retry mechanism?
  -                Delay = randoms:rand_uniform(0, 30),
  +                RoundTrips = entry_round_trips(Entry),
  +                Delay = randoms:rand_uniform(0, 10),
                   comm:send_local_after(Delay, self(),
                                           {req_start, {read, strong,
                                           entry_client(Entry),
                                           entry_key(Entry),
                                           entry_datatype(Entry),
                                           entry_fun(Entry),
  -                                        NextRound}})
  +                                        NextRound,
  +                                        RoundTrips}})
           end,
       State;
   
  
positive.code:                                                 Type,
                                                  entry_fun(NewEntry),
                                                  Type:new()),
                          %% keep the merged value we have collected in this phase, which will
                          %% be the value returned if phase 2 succeeds
                          NextStepEntry = entry_set_replies(TEntry, NewReplies#r_replies{reply_count=0}),
                          save_entry(NextStepEntry, tablename(State)),
  
                          trace_mpath:log_info(self(), {read_strong_phase2_start,
  
negative.code: entry_new_read(ReqId, Client, Key, DataType, QueryFun, EmptyVal) ->
      {ReqId, Client, Key, DataType, QueryFun,
       #r_replies{reply_count=0, highest_seen_round=pr:new(0,0), highest_replies=0,
                  value=EmptyVal, cons_value=true}, _RoundTrips=0}.
  
  -spec entry_new_write(any(), comm:erl_local_pid(), ?RT:key(), module(), crdt:update_fun()) -> entry().
  entry_new_write(ReqId, Client, Key, DataType, UpdateFun) ->
      {ReqId, Client, Key, DataType, UpdateFun, #w_replies{reply_count=0}, _RoundTrips=0}.
  
  -spec entry_reqid(entry())        -> any().
  entry_reqid(Entry)                -> element(1, Entry).
  