type json
[
|
`Null
`Bool of bool
`Float of float
`String of string
`List of json list
`Assoc of (string * json) list
]
module type IO : sig ... end
module type Json_encoder_decoder : sig ... end
module Make : functor (IO : IO) -> Json_encoder_decoder with module IO := IO