+ ZeroLimitedOperation
This commit is contained in:
parent
a862c199be
commit
3667b6a9dd
1 changed files with 12 additions and 0 deletions
12
src/api.ml
12
src/api.ml
|
|
@ -1074,3 +1074,15 @@ module AccountLimit = struct
|
|||
|> opt_mem "soft_limit" Jsont.bool ~enc:soft_limit
|
||||
|> finish
|
||||
end
|
||||
|
||||
module ZeroLimitedOperation = struct
|
||||
type t = { operation_type: Account_operation.t }
|
||||
|
||||
let jsont =
|
||||
let make operation_type = { operation_type } in
|
||||
let operation_type v = v.operation_type in
|
||||
let open Jsont.Object in
|
||||
map ~kind:"ZeroLimitedOperation" make
|
||||
|> mem "operation_type" Account_operation.jsont ~enc:operation_type
|
||||
|> finish
|
||||
end
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue