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

Browse source
This commit is contained in:
swrup 2026-02-20 21:27:21 +01:00
parent e19c6d60c2
commit aaa8771448
3 changed files with 26 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/http_management.ml
View file

@ -75,7 +75,8 @@ module Keys_post = struct
in
verify_f ~f:Keys.verify_with_master_key master_sig r
let verify keys MasterSignatures.{ denom_sigs; signkey_sigs } =
let verify (module Keys : Keys.S)
MasterSignatures.{ denom_sigs; signkey_sigs } =
let* () = list_iter (verify_denom_signature keys) denom_sigs in
let* () = list_iter (verify_signkey_signature keys) signkey_sigs in
Ok ()