refacto
This commit is contained in:
parent
2596733033
commit
305818ae4a
20 changed files with 649 additions and 757 deletions
|
|
@ -8,9 +8,9 @@ type t = {
|
|||
master_sig: Signatures.ExchangeSigningKeyValidity.t;
|
||||
}
|
||||
|
||||
let verify_exchange_signing_key_validity ~key sk =
|
||||
let verify ~master_key sk =
|
||||
let open Signatures.ExchangeSigningKeyValidity in
|
||||
verify key sk.master_sig
|
||||
verify master_key sk.master_sig
|
||||
{
|
||||
R.start= sk.stamp_start;
|
||||
expire= sk.stamp_expire;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue