Ketrew API : Ketrew.Explorer

sig
  type t
  val create : client:Ketrew.Client.t -> unit -> Ketrew.Explorer.t
  val explore :
    Ketrew.Explorer.t ->
    (unit,
     [> `Client of Ketrew.Client.Error.t
      | `Database of Persistent_data.Error.database
      | `Failure of string
      | `IO of
          [> `Read_file_exn of string * exn | `Write_file_exn of string * exn ]
      | `System of [> `File_info of string ] * [> `Exn of exn ] ])
    Unix_io.Deferred_result.t
end