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

Browse source
This commit is contained in:
swrup 2025-12-07 04:27:46 +01:00
parent ac0b346877
commit e0f825a9dd
1 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/pg.ml
View file

@ -110,8 +110,10 @@ let lookup_denomination_key =
Caqti_type.( Caqti_type.(
denomination_hash denomination_hash
->? t10 time time time time amount amount amount amount amount age_mask) ->? t10 time time time time amount amount amount amount amount age_mask)
"SELECT valid_from, expire_withdraw, expire_deposit, expire_legal, coin, \ "SELECT valid_from, expire_withdraw, expire_deposit, expire_legal, \
fee_withdraw, fee_deposit, fee_refresh, fee_refund, age_mask FROM \ (coin).val, (coin).frac, (fee_withdraw).val, (fee_withdraw).frac, \
(fee_deposit).val, (fee_deposit).frac, (fee_refresh).val, \
(fee_refresh).frac, (fee_refund).val, (fee_refund).frac, age_mask FROM \
denominations WHERE denom_pub_hash=$1" denominations WHERE denom_pub_hash=$1"
in in
fun (module Conn : CONN) (h_denom_pub : DenominationHash.t) -> fun (module Conn : CONN) (h_denom_pub : DenominationHash.t) ->