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

+ wip clean keys.ml

Browse source
This commit is contained in:
swrup 2026-02-20 20:44:52 +01:00
parent 07659222dc
commit e19c6d60c2
7 changed files with 249 additions and 520 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/pg.ml
View file

@ -87,7 +87,7 @@ let get_denominations =
dn LEFT JOIN denomination_revocations AS dnr ON dn.denominations_serial \
= dnr.denominations_serial"
in
fun (module Conn : CONN) -> Conn.collect_list req ()
fun (module Conn : CONN) () -> Conn.collect_list req ()
(* note: does not update revocation *)
let insert_denom =
@ -328,7 +328,7 @@ let get_wire_accounts =
credit_restrictions::TEXT, master_sig, bank_label, priority FROM \
wire_accounts WHERE is_active"
in
fun (module Conn : CONN) -> Conn.collect_list req ()
fun (module Conn : CONN) () -> Conn.collect_list req ()
let insert_drain_profit =
let req =