Update of /project/elephant/cvsroot/elephant/src/elephant In directory clnet:/tmp/cvs-serv3903/src/elephant Modified Files: transactions.lisp Log Message: Provide checkpoint function --- /project/elephant/cvsroot/elephant/src/elephant/transactions.lisp 2007/02/17 19:28:53 1.9 +++ /project/elephant/cvsroot/elephant/src/elephant/transactions.lisp 2007/02/18 10:58:58 1.10 @@ -147,7 +147,7 @@ ,@(remove-keywords '(:store-controller :parent :transaction :retries) keyargs)))))) -(defmacro with-batched-transaction ((batch size list &rest txn-options) &body body) +(defmacro with-batch-transaction ((batch size list &rest txn-options) &body body) "Perform a set of DB operations over a list of elements in batches of size 'size'. Pass specific transaction options after the list reference." `(loop for ,batch in (subsets ,size ,list) do