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

Browse source
This commit is contained in:
swrup 2025-12-06 17:14:49 +01:00
parent 6eb7edb0bc
commit 35b41e9606
1 changed files with 3 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

10
src/api.ml
View file

@ -1075,15 +1075,11 @@ module AccountLimit = struct
|> finish |> finish
end end
module ZeroLimitedOperation = struct module ZeroLimitedOperation = struct
type t = { type t = { operation_type: Account_operation.t }
operation_type: Account_operation.t;
}
let jsont = let jsont =
let make operation_type= let make operation_type = { operation_type } in
{ operation_type}
in
let operation_type v = v.operation_type in let operation_type v = v.operation_type in
let open Jsont.Object in let open Jsont.Object in
map ~kind:"ZeroLimitedOperation" make map ~kind:"ZeroLimitedOperation" make