Source file p11_aes_ctr_params.ml

1
2
3
4
5
6
7
8
type t =
  { bits : P11_ulong.t
  ; block : P11_hex_data.t }
[@@deriving eq, make, ord, show, yojson]

let bits x = x.bits

let block x = x.block