This commit is contained in:
swrup 2025-11-28 19:17:25 +01:00
parent ab82a357a9
commit ee0cace116
7 changed files with 32 additions and 14 deletions

View file

@ -25,11 +25,11 @@ let denom_signature ~master_key
Crypto.RsaPublicKey.to_octets pub
in
let h_denom_pub = Api.HashCode.hash pub_octets in
let master = Crypto.EddsaPrivateKey.(pub_of_priv master_key) in
let denom_hash = Bin_type.DenominationHash.hash pub_octets in
let master_sig =
let open Bin_type in
(*let open Bin_type in*)
let open Bin_signature.DenominationKeyValidityPS in
let master = Crypto.EddsaPrivateKey.(pub_of_priv master_key) in
let denom_hash = DenominationHash.hash pub_octets in
{
master;
start= stamp_start;