2016-10-12 17:00:19 +04:00
|
|
|
(**************************************************************************)
|
|
|
|
(* *)
|
2017-11-14 03:36:14 +04:00
|
|
|
(* Copyright (c) 2014 - 2017. *)
|
2016-10-12 17:00:19 +04:00
|
|
|
(* Dynamic Ledger Solutions, Inc. <contact@tezos.com> *)
|
|
|
|
(* *)
|
|
|
|
(* All rights reserved. No warranty, explicit or implicit, provided. *)
|
|
|
|
(* *)
|
|
|
|
(**************************************************************************)
|
|
|
|
|
2018-02-02 19:26:02 +04:00
|
|
|
module Make(Error : sig
|
|
|
|
type error
|
|
|
|
val pp_print_error: Format.formatter -> error list -> unit
|
|
|
|
end) : sig
|
2017-03-07 12:51:11 +04:00
|
|
|
|
2018-02-02 19:26:02 +04:00
|
|
|
val run : string -> (string * (string -> (unit, Error.error list) result Lwt.t)) list -> unit
|
|
|
|
|
|
|
|
end
|