    @typep fold_req :: {:riak_core_fold_req_v1, ((term, term) -> term), term}
 
    @nil_value MsgPack.pack(nil)
+
+   @object_page_size 32
 
    require Lager
    require Genomu.Constants.CommitObject

             [{_, {value, _serialized}}] = ETS.lookup(staging, {key, entry_clock})
             {value, entry_clock, txn_rev}
           nil ->
             {@nil_value, "", ""}
         end
     end
   end


   @spec stage(Genomu.cell, Genomu.Operation.serialized, value :: term, State.t) :: State.t
   defp stage(cell, serialized, value, State[staging_tab: tab] = state) do
     ETS.insert(tab, {cell, {value, serialized}})
     state
   end


                      State[tab: tab, staging_tab: staging, commit_tab: commit_tab] = state) do
     lc {key, entry_clock} inlist entries do
       case ETS.lookup(tab, key) do
         [] -> 
           page = 0
           case ETS.lookup(tab, {key, page}) do
             [] ->  history = []; value = @nil_value ; page_ctr = 0
             [{_, {page_ctr, {value, history}}}] -> :ok
           end
         [{_, page}] ->
           [{_, {page_ctr, {value, history}}}] = ETS.lookup(tab, {key, page})
       end
       {MsgPack.Map[map: commit_object_dict], ""} = MsgPack.unpack(commit_object)
       MsgPack.Map[map: log] = commit_object_dict[CO.log]
