Yojson_compat
type yojson = [ `Null | `Bool of bool | `Int of int | `Intlit of string | `Float of float | `String of string | `Assoc of (string * 't) list | `List of 't list | `Tuple of 't list | `Variant of string * 't option ] as 't