2018-01-24 15:48:25 +04:00
|
|
|
(**************************************************************************)
|
|
|
|
|
(* *)
|
2018-02-06 00:17:03 +04:00
|
|
|
(* Copyright (c) 2014 - 2018. *)
|
2018-01-24 15:48:25 +04:00
|
|
|
(* Dynamic Ledger Solutions, Inc. <contact@tezos.com> *)
|
|
|
|
|
(* *)
|
|
|
|
|
(* All rights reserved. No warranty, explicit or implicit, provided. *)
|
|
|
|
|
(* *)
|
|
|
|
|
(**************************************************************************)
|
|
|
|
|
|
|
|
|
|
(** Protocol version *)
|
|
|
|
|
|
|
|
|
|
type t = {
|
|
|
|
|
name : string ;
|
|
|
|
|
major : int ;
|
|
|
|
|
minor : int ;
|
|
|
|
|
}
|
|
|
|
|
(** Type of a protocol version. *)
|
|
|
|
|
|
|
|
|
|
val pp : Format.formatter -> t -> unit
|
|
|
|
|
val encoding : t Data_encoding.t
|
|
|
|
|
val common : t list -> t list -> t option
|
|
|
|
|
|
