Commands.Batch
type batch =
(Store.path
* [ `Contents of
[ `Hash of Store.hash | `Value of Store.contents ]
* Store.metadata option
| `Tree of Tree.t
| `Remove ])
list
module Apply :
CMD
with type req = (store * Store.path) * Store.info * batch
and type res = Store.commit_key