Module Irmin_test

module type S = Irmin.S with type step = string and type key = string list and type contents = string and type branch = string
val reporter : ?⁠prefix:string -> unit -> Logs.reporter
type t = {
name : string;
init : unit -> unit Lwt.t;
clean : unit -> unit Lwt.t;
config : Irmin.config;
store : (module S);
stats : (unit -> int * int) option;
}
val line : string -> unit
val store : (module Irmin.S_MAKER) -> (module Irmin.Metadata.S) -> (module S)
val testable : 'a Irmin.Type.t -> 'a Alcotest.testable
val check : 'a Irmin.Type.t -> string -> 'a -> 'a -> unit
val checks : 'a Irmin.Type.t -> string -> 'a list -> 'a list -> unit
module Store : sig ... end