+ ZeroLimitedOperation
This commit is contained in:
parent
a862c199be
commit
6eb7edb0bc
1 changed files with 16 additions and 0 deletions
16
src/api.ml
16
src/api.ml
|
|
@ -1074,3 +1074,19 @@ 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