Batch (irmin-server.Irmin_server_unix.Make

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