1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
open! Ppx_yojson_conv_lib.Yojson_conv
module Json = struct
type t = Yojson.Safe.t
let yojson_of_t = Fun.id
let t_of_yojson = Fun.id
end
type t =
{ ok : bool
; err : string option [@yojson.option]
; data : Json.t option [@yojson.option]
}
[@@deriving yojson]