This commit is contained in:
swrup 2026-01-24 02:16:14 +01:00
parent 58849ab89b
commit da7f0b6929

View file

@ -1,5 +1,3 @@
[@@@ocaml.warning "-26-27"]
open Syntax open Syntax
open Api open Api
module String_map = Stdlib.Map.Make (Stdlib.String) module String_map = Stdlib.Map.Make (Stdlib.String)
@ -20,10 +18,10 @@ let denomgroup_of_denomdata
fee_deposit; fee_deposit;
fee_refresh; fee_refresh;
fee_refund; fee_refund;
age_mask; age_mask= _;
h_pub; h_pub= _;
master_sig; master_sig;
revoked_sig; revoked_sig= _;
} = } =
let master_sig = match master_sig with None -> assert false | Some v -> v in let master_sig = match master_sig with None -> assert false | Some v -> v in
let denoms = let denoms =