rm suffix

This commit is contained in:
swrup 2025-12-07 05:43:04 +01:00
parent 4fc9a96fde
commit 588b38d66f
9 changed files with 122 additions and 122 deletions

View file

@ -21,7 +21,7 @@ let denom_signature ~master_key
let octets = DenominationKey.to_octets denom_pub in
let h_denom_pub = HashCode.hash octets in
let master_sig =
let open Bin_sig.DenominationKeyValidityPS in
let open Bin_sig.DenominationKeyValidity in
let master = EddsaPrivateKey.(pub_of_priv master_key) in
let denom_hash = DenominationHash.hash octets in
sign ~key:master_key
@ -44,7 +44,7 @@ let signkey_signature ~master_key
FutureSignKey.
{ key; stamp_start; stamp_expire; stamp_end; signkey_secmod_sig= _ } =
let master_sig =
let open Bin_sig.ExchangeSigningKeyValidityPS in
let open Bin_sig.ExchangeSigningKeyValidity in
sign ~key:master_key
{
start= stamp_start;
@ -78,7 +78,7 @@ let verify_future_signkey ~sm_signkey_pub
let duration =
Timestamp.diff stamp_start stamp_expire |> Timestamp.of_span_exn
in
let open Bin_sig.SigningKeyAnnouncementPS in
let open Bin_sig.SigningKeyAnnouncement in
verify ~key:sm_signkey_pub signkey_secmod_sig
{ exchange_pub; anchor_time; duration }
@ -106,7 +106,7 @@ let verify_future_denom ~sm_denom_pub
let duration_withdraw =
Timestamp.diff stamp_start stamp_expire_withdraw |> Timestamp.of_span_exn
in
let open Bin_sig.DenominationKeyAnnouncementPS in
let open Bin_sig.DenominationKeyAnnouncement in
verify ~key:sm_denom_pub denom_secmod_sig
{ h_denom_pub; h_section_name; anchor_time; duration_withdraw }