add revoked_sig option to sk/dn_data
This commit is contained in:
parent
8f433fcb28
commit
9a68d18a1d
7 changed files with 45 additions and 39 deletions
|
|
@ -17,6 +17,7 @@ module Keys_get = struct
|
|||
age_mask;
|
||||
h_pub;
|
||||
master_sig= _;
|
||||
revoked_sig= _;
|
||||
} :
|
||||
Denom_data.t) =
|
||||
let denom_pub =
|
||||
|
|
@ -51,7 +52,14 @@ module Keys_get = struct
|
|||
}
|
||||
|
||||
let mk_future_signkey ~sm
|
||||
({ pub; stamp_start; stamp_expire; stamp_end; master_sig= _ } :
|
||||
({
|
||||
pub;
|
||||
stamp_start;
|
||||
stamp_expire;
|
||||
stamp_end;
|
||||
master_sig= _;
|
||||
revoked_sig= _;
|
||||
} :
|
||||
Signkey_data.t) =
|
||||
let signkey_secmod_sig =
|
||||
let open Bin_sig.SigningKeyAnnouncement in
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue