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

+ test disable-auditor/wire/drain

Browse source
This commit is contained in:
swrup 2026-02-25 20:12:13 +01:00
parent 05cfa7a5b1
commit 6bd65561f8
9 changed files with 386 additions and 193 deletions
Download patch file Download diff file Expand all files Collapse all files

14
src/pg_type.ml
View file

@ -24,7 +24,6 @@ let eddsa_sig = EddsaSignature.caqti
(* todo: enum type for wire_method? *)
let wire_method = Caqti_type.string
let payto_uri = Caqti_type.string
let b32 = B32.caqti
include struct
(* alias for hash *)
@ -266,7 +265,7 @@ let drain_profit_message =
amount;
master_sig;
})
Caqti_type.(t6 b32 string string time amount master_sig)
Caqti_type.(t6 octets string string time amount master_sig)
let aml_officer_setup =
let master_sig = Signatures.MasterAmlOfficerStatus.caqti in
@ -351,3 +350,14 @@ let exchange_partner_setup =
wad_fee;
})
Caqti_type.(t7 eddsa_pub time time time_span amount master_sig string)
let auditor =
let open Auditor in
Caqti_type.custom
~encode:(fun
{ auditor_pub; auditor_url; auditor_name; last_change; is_active } ->
Ok (auditor_pub, auditor_url, auditor_name, last_change, is_active))
~decode:(fun
(auditor_pub, auditor_url, auditor_name, last_change, is_active) ->
Ok { auditor_pub; auditor_url; auditor_name; last_change; is_active })
Caqti_type.(t5 eddsa_pub string string time bool)