X.GcSourcemodule Args : sig ... endval v :
root:string ->
new_files_path:string ->
generation:int ->
unlink:bool ->
dispatcher:Args.Dispatcher.t ->
fm:Args.Fm.t ->
contents:Irmin.Perms.read Args.Contents_store.t ->
node:Irmin.Perms.read Args.Node_store.t ->
commit:Irmin.Perms.read Args.Commit_store.t ->
Args.key ->
tval finalise :
wait:bool ->
t ->
([> `Finalised of Stats.Latest_gc.stats | `Running ], Args.Errs.t) result
Lwt.t