    @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

                       v
                     end
                   end)
       ETS.insert(tab, {key, {value, [{entry_clock, clock}|history]}})
     end
     ETS.insert(commit_tab, {{:C, clock}, {commit_object, [clock]}})
     {:reply, {:ok, ref, state.partition, :ok}, state}

     end
   end

   defp lookup_cell_txn({key, _} = cell, State[tab: tab] = state) do
     case ETS.lookup(tab, key) do
       [] -> page = 0
       [{_, page}] -> :ok
     end
     lookup_cell_txn(cell, state, page)
   end
   defp lookup_cell_txn({key, rev} = cell, State[tab: tab, staging_tab: staging] = state, page) do
     case ETS.lookup(tab, {key, page}) do
       [] ->
         {@nil_value, "", ""}
       [{_key, {_, {value, [{entry_clock, ^rev}|_]}}}] ->
         {value, entry_clock, rev}
       [{_key, {_, {_, history}}}] ->
         case Enum.find(history, fn({entry_clock, _}) -> 
                                                         entry_clock == rev or
                                                         ITC.decode(entry_clock) |>
