[elephant-cvs] CVS elephant/src/elephant

[ieslick]

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