swrup/mte
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Browse source
This commit is contained in:
swrup 2025-10-18 00:50:31 +02:00
parent 08512e74fa
commit cec8ba878d
2 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/binary_formats.ml
View file

@ -235,7 +235,7 @@ end
module DenominationHash = struct
include HASH_64
let mk (pub : Mirage_crypto_pk.Rsa.pub) =
let hash (pub : Mirage_crypto_pk.Rsa.pub) =
pub
|> GNUNET_RsaPublicKey.of_pub
|> Bin.to_string GNUNET_RsaPublicKey.bin

2
src/management.ml
View file

@ -28,7 +28,7 @@ let mk_future_denom denom_secmod_sign_f
in
let denom_secmod_sig =
let open Binary_formats in
let h_denom_pub = DenominationHash.mk pub in
let h_denom_pub = DenominationHash.hash pub in
let h_section_name = HashCode.of_string section_name in
let anchor_time =
TimeAbsoluteNBO.{ v= Util.ptime_to_int64_us stamp_start }