Sourceval buffer_add_json :
Buffer.t->[< `Array of 'b list| `Bool of bool| `Float of float| `Null| `Object of (string * 'c) list| `String of string ]as 'a ->
unit
Sourceval buffer_add_json_string : Buffer.t->string -> unit
Sourceval to_string :
[< `Array of 'b list| `Bool of bool| `Float of float| `Null| `Object of (string * 'b) list| `String of string ]as 'a ->
string