(**************************************************************************)
(*                                                                        *)
(*    Copyright (c) 2014 - 2017.                                          *)
(*    Dynamic Ledger Solutions, Inc. <contact@tezos.com>                  *)
(*                                                                        *)
(*    All rights reserved. No warranty, explicit or implicit, provided.   *)
(*                                                                        *)
(**************************************************************************)

(** Low-level part of the [Updater]. *)

module Meta : sig
  val to_file:
    Lwt_io.file_name ->
    ?hash:Protocol_hash.t ->
    ?env_version:Protocol.env_version ->
    string list -> unit
  val of_file:
    Lwt_io.file_name ->
    Protocol_hash.t option * Protocol.env_version option * string list
end

val read_dir: Lwt_io.file_name -> Protocol_hash.t * Protocol.t

val main: unit -> unit