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

rm deprecated

Browse source
This commit is contained in:
swrup 2026-02-27 00:33:29 +01:00
parent b1602a5020
commit f56ef6b544
2 changed files with 5 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

14
src/api.ml
View file

@ -1265,7 +1265,6 @@ module ExchangeKeysResponse = struct
accounts: ExchangeWireAccount.t list;
wire_fees: AggregateTransferFee.t list Stdlib.Map.Make(Stdlib.String).t;
wads: ExchangePartnerListEntry.t list;
rewards_allowed: bool;
kyc_enabled: bool;
disable_direct_deposit: bool;
master_public_key: EddsaPublicKey.t;
@ -1291,11 +1290,11 @@ module ExchangeKeysResponse = struct
let jsont =
let make version base_url currency shopping_url open_banking_gateway
bank_compliance_language currency_specification tiny_amount stefan_abs
stefan_log stefan_lin asset_type accounts wire_fees wads rewards_allowed
kyc_enabled disable_direct_deposit master_public_key
reserve_closing_delay wallet_balance_limit_without_kyc hard_limits
zero_limits denominations exchange_sig exchange_pub recoup global_fees
list_issue_date auditors signkeys extensions extensions_sig =
stefan_log stefan_lin asset_type accounts wire_fees wads kyc_enabled
disable_direct_deposit master_public_key reserve_closing_delay
wallet_balance_limit_without_kyc hard_limits zero_limits denominations
exchange_sig exchange_pub recoup global_fees list_issue_date auditors
signkeys extensions extensions_sig =
{
version;
base_url;
@ -1312,7 +1311,6 @@ module ExchangeKeysResponse = struct
accounts;
wire_fees;
wads;
rewards_allowed;
kyc_enabled;
disable_direct_deposit;
master_public_key;
@ -1348,7 +1346,6 @@ module ExchangeKeysResponse = struct
let accounts v = v.accounts in
let wire_fees v = v.wire_fees in
let wads v = v.wads in
let rewards_allowed v = v.rewards_allowed in
let kyc_enabled v = v.kyc_enabled in
let disable_direct_deposit v = v.disable_direct_deposit in
let master_public_key v = v.master_public_key in
@ -1388,7 +1385,6 @@ module ExchangeKeysResponse = struct
(Jsont.Object.as_string_map (Jsont.list AggregateTransferFee.jsont))
~enc:wire_fees
|> mem "wads" (Jsont.list ExchangePartnerListEntry.jsont) ~enc:wads
|> mem "rewards_allowed" Jsont.bool ~enc:rewards_allowed
|> mem "kyc_enabled" Jsont.bool ~enc:kyc_enabled
|> mem "disable_direct_deposit" Jsont.bool ~enc:disable_direct_deposit
|> mem "master_public_key" EddsaPublicKey.jsont ~enc:master_public_key