~ HashCode.to_denomination_hash

This commit is contained in:
swrup 2025-12-07 08:11:11 +01:00
parent cf20d60bb6
commit 32fa5b1fc3
2 changed files with 4 additions and 11 deletions

View file

@ -69,14 +69,12 @@ module HashCode : sig
type t
val hash : string -> t
val to_octets : t -> string
val to_denomination_hash : t -> Bin_type.DenominationHash.t
val jsont : t Jsont.t
end = struct
type t = B32.t
(* TODO rm
for convertion to DenominationHash *)
let to_octets s = s
let to_denomination_hash s = Bin_type.DenominationHash.of_octets s
let hash s =
let open Digestif.SHA512 in