Module GapiJson

Utilities to manipulate JSON documents.

type json_data_type =
| Object
| Array
| Scalar
val json_data_type_to_string : json_data_type -> string
type json_metadata = {
name : string;
data_type : json_data_type;
}
val metadata_description : json_metadata -> string
type json_data_model = (json_metadata, Yojson.Safe.json) GapiCore.AnnotatedTree.t
val unexpected : string -> json_data_model -> 'a -> 'a
val render_value : string -> Yojson.Safe.json -> Yojson.Safe.json -> json_data_model list
val render_string_value : ?⁠default:string -> string -> string -> json_data_model list
val render_nullable_string_value : ?⁠default:string -> string -> string -> json_data_model list
val render_int_value : ?⁠default:int -> string -> int -> json_data_model list
val render_int64_value : ?⁠default:int64 -> string -> int64 -> json_data_model list
val render_bool_value : ?⁠default:bool -> string -> bool -> json_data_model list
val render_float_value : ?⁠default:float -> string -> float -> json_data_model list
val render_date_value : ?⁠time:bool -> ?⁠default:GapiDate.t -> string -> GapiDate.t -> json_data_model list
val render_struct : string -> json_data_type -> json_data_model list list -> json_data_model list
val render_object : string -> json_data_model list list -> json_data_model list
val render_collection : string -> json_data_type -> ('a -> json_data_model list) -> 'a list -> json_data_model list
val render_array : string -> ('a -> json_data_model list) -> 'a list -> json_data_model list
val render_root : ('a -> json_data_model list) -> 'a -> json_data_model
val parse_children : ('a -> json_data_model -> 'a) -> 'a -> ('a -> 'b) -> json_data_model list -> 'b
val parse_collection : ('a -> json_data_model -> 'a) -> 'a -> ('a list -> 'b) -> json_data_model list -> 'b
val parse_root : ('a -> json_data_model -> 'a) -> 'a -> json_data_model -> 'a
val parse_string_element : string -> json_data_model -> string
val parse_dictionary_entry : (string * string) -> json_data_model -> string * string
val json_to_data_model : Yojson.Safe.json -> json_data_model
val data_model_to_json : json_data_model -> Yojson.Safe.json
val parse_json_response : (json_data_model -> 'a) -> GapiPipe.OcamlnetPipe.t -> 'a
val parse_json_string : (json_data_model -> 'a) -> string -> 'a
val default_content_type : string
val render_json : ('a -> json_data_model) -> 'a -> GapiCore.PostData.t
module StringDictionary : sig ... end