add data_file.ml
This commit is contained in:
parent
760e6de1fb
commit
bc91f7357c
8 changed files with 207 additions and 101 deletions
|
|
@ -175,17 +175,6 @@ module Coin = struct
|
|||
}
|
||||
|
||||
let all_coins = List.map parse_coin coin_sections
|
||||
|
||||
let get_coin name =
|
||||
match List.find_opt (fun v -> v.section_name = name) all_coins with
|
||||
| None ->
|
||||
fail_with
|
||||
(Fmt.str "section `[coin_%s]` not found, coin `%s` is not defined"
|
||||
name name)
|
||||
| Some v -> v
|
||||
|
||||
let kudo_1 = get_coin "kudo_1"
|
||||
let kudo_2 = get_coin "kudo_2"
|
||||
end
|
||||
|
||||
module Exchange_secmod_rsa = struct
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue