package pkcs11

  1. Overview
  2. Docs
package pkcs11
Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source

Source file p11_des_cbc_encrypt_data_params.ml

1
2
3
4
5
6
7
8
9
10
11
12
type t =
  { iv: string
  ; data: string
  }
[@@deriving yojson]

let compare a b =
  let c = String.compare a.iv b.iv in
  if c <> 0 then
    c
  else
    String.compare a.data b.data