Traverse_bfs.Make
module S : STORE
val fold : S.t -> ('a -> ?name:Path.t -> length:int64 -> S.Hash.t -> S.Value.t -> 'a Lwt.t) -> path:Path.t -> 'a -> S.Hash.t -> 'a Lwt.t
val iter : S.t -> (S.Hash.t -> S.Value.t -> unit Lwt.t) -> S.Hash.t -> unit Lwt.t