anchor.diff:              rl_chk_and_encode(RL, [{rdht_tx_write, Key,
                                       encode_value(Value)} | Acc],
                                 OKorAbort);
  -        {commit} ->
  +        {commit} = Commit ->
               log:log(warn, "Commit not at end of a req_list. Deciding abort."),
  -            rl_chk_and_encode(RL, [{commit} | Acc], abort);
  +            rl_chk_and_encode(RL, [Commit | Acc], abort);
           Op ->
               rl_chk_and_encode(RL, [Op | Acc], OKorAbort)
       end.
  
positive.code:             tlog_write(Entry, Key, encode_value(NewValue2));
          {ok, _} -> %% value is not a list
              Error = {fail, not_a_list},
              NewTlogEntry = case tx_tlog:get_entry_status(Entry) of
                                 {fail, _} -> Entry;
                                 not_found -> tx_tlog:set_entry_status(Entry, {fail, not_found});
                                 _ -> tx_tlog:set_entry_status(Entry, Error)
                             end,
              {NewTlogEntry, Error};
          X when erlang:is_tuple(X) -> %% other previous error
              {Entry, X}
      end.
  
negative.code: -spec tlog_add_on_nr(tx_tlog:tlog_entry(), client_key(),
                        client_value()) ->
                               {tx_tlog:tlog_entry(), result_entry_write()}.
  tlog_add_on_nr(Entry, _Key, X) when (not erlang:is_number(X)) ->
      Error = {fail, not_a_number},
      {update_tlog_entry_2phase_op(Entry, Error), Error};
  tlog_add_on_nr(Entry, Key, X) ->
      {_, Res0} = tlog_read(Entry, Key),
      case Res0 of
  