X.RepoSourcetype t = {config : Irmin.Backend.Conf.t;contents : Irmin.Perms.read Contents.CA.t;node : Irmin.Perms.read Node.CA.t;commit : Irmin.Perms.read Commit.CA.t;branch : Branch.t;fm : File_manager.t;dict : Dict.t;dispatcher : Dispatcher.t;mutable during_batch : bool;mutable running_gc : running_gc option;}val batch :
t ->
(Irmin.Perms.read_write Contents.t ->
Irmin.Perms.read_write Node.t ->
Irmin.Perms.read_write Commit.t ->
'a Lwt.t) ->
'a Lwt.t