26 lines
942 B
OCaml
26 lines
942 B
OCaml
(**************************************************************************)
|
|
(* *)
|
|
(* Copyright (c) 2014 - 2018. *)
|
|
(* Dynamic Ledger Solutions, Inc. <contact@tezos.com> *)
|
|
(* *)
|
|
(* All rights reserved. No warranty, explicit or implicit, provided. *)
|
|
(* *)
|
|
(**************************************************************************)
|
|
|
|
type t =
|
|
| Not_running
|
|
| Forking of {
|
|
protocol: Protocol_hash.t ;
|
|
expiration: Time.t ;
|
|
}
|
|
| Running of {
|
|
chain_id: Chain_id.t ;
|
|
genesis: Block_hash.t ;
|
|
protocol: Protocol_hash.t ;
|
|
expiration: Time.t ;
|
|
}
|
|
|
|
val encoding: t Data_encoding.t
|
|
|
|
val pp : Format.formatter -> t -> unit
|