wip functorize secmod

This commit is contained in:
swrup 2026-01-22 05:12:20 +01:00
parent 0fed6735db
commit 0bf16a6320

View file

@ -1,4 +1,4 @@
(* TODO functorize *) module type S = sig
open Crypto open Crypto
type t type t
@ -23,7 +23,6 @@ val find_denom_section_name : t -> denomination_hash -> string option
(* TODO (* TODO
problem of keeping db and secmod state syncronized problem of keeping db and secmod state syncronized
do db interaction from secmod? *) do db interaction from secmod? *)
val init : (module Pg.CONN) -> t
val add_signkey_master_signatures : val add_signkey_master_signatures :
(module Pg.CONN) -> (module Pg.CONN) ->
@ -48,3 +47,6 @@ val revoke_denomination :
denomination_hash -> denomination_hash ->
Bin_sig.MasterDenominationKeyRevocation.t -> Bin_sig.MasterDenominationKeyRevocation.t ->
(unit, string) result (unit, string) result
end
module Make (_ : Pg.CONN) : S