module type Json_min' =sig
..end
type
a
val write : Buffer.t -> a -> unit
val read : Deriving_Json_lexer.lexbuf -> a
val match_variant : [ `Cst of int | `NCst of int ] -> bool
val read_variant : Deriving_Json_lexer.lexbuf ->
[ `Cst of int | `NCst of int ] -> a