diff --git a/src/api.ml b/src/api.ml index e4d7e007..ede981d6 100644 --- a/src/api.ml +++ b/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