Source file p11_version.ml

1
2
3
4
5
6
type t =
  { major : int
  ; minor : int }
[@@deriving eq, ord, show, yojson]

let to_string version = Printf.sprintf "%i.%i" version.major version.minor