anchor.diff:              {ok, Result, CommitTime};
           {error, Reason} -> {error, Reason}
       end.
  -            
  -    
  +
  +
   %% Object creation and types
   -spec create_bucket(bucket(), type()) -> {ok, bucket()}.
   create_bucket(Bucket, _Type) ->
  
positive.code:             {ok, CommitTime};
          {error, Reason} -> {error, Reason}
      end.
               
  read_objects(Clock, _Properties, Objects) ->
      Args = lists:map(
               fun({Key, Type, _Bucket}) ->
                          {read, {Key, Type}}
               end,
               Objects),
      case clocksi_execute_tx(Clock, Args) of
  
negative.code: %% API for applications
  -export([
           start_transaction/2,
           read_objects/2,
           read_objects/3,
           update_objects/2,
           update_objects/3,
  