anchor.diff:              {test_and_set, Key, Old, New} -> tlog_test_and_set(Entry, Key, Old, New, EnDecode)
           end,
       NewTLog = tx_tlog:update_entry(TLog, NewTLogEntry),
  -    do_reqs_on_tlog_iter(NewTLog, ReqTail, [ResultEntry | Acc], EnDecode).
  +    do_reqs_on_tlog_iter(NewTLog, ReqTail, [ResultEntry | Acc], EnDecode);
  +do_reqs_on_tlog_iter(TLog, [], Acc, _EnDecode) ->
  +    {tlog_cleanup(TLog), lists:reverse(Acc)}.
   
   -spec tlog_cleanup(tx_tlog:tlog()) -> tx_tlog:tlog().
   tlog_cleanup(TLog) ->
  
positive.code:                  Acc) ->
      TKey = tx_tlog:get_entry_key(TEntry),
      RTKey = tx_tlog:get_entry_key(RTEntry),
      if TKey =:= RTKey ->
             %% key was in TLog, new entry is newer and contains value
             %% for read?
             case tx_tlog:get_entry_operation(TEntry) of
  
negative.code:     %% better round robin.
      [ begin
            NewReqId = uid:get_global_uid(), % local id not sufficient
            case req_get_op(Entry) of
                write           -> rdht_tx_write:work_phase(self(), NewReqId, Entry);
                read            -> rdht_tx_read:work_phase(self(), NewReqId, Entry);
                test_and_set    -> rdht_tx_read:work_phase(self(), NewReqId, Entry);
                add_del_on_list -> rdht_tx_read:work_phase(self(), NewReqId, Entry);
                add_on_nr       -> rdht_tx_read:work_phase(self(), NewReqId, Entry)
            end,
            NewReqId
        end || Entry <- ReqList ].
  