sig
  type json = Json.t
  val format :
    ?indent:int ->
    ?margin:int ->
    ('a, Stdlib.Format.formatter, unit, Server.Jbuffer.json) Stdlib.format4 ->
    'a
  val to_json :
    ?indent:int ->
    ?margin:int ->
    (Stdlib.Format.formatter -> '-> unit) -> '-> Server.Jbuffer.json
  type buffer
  val create : ?indent:int -> ?margin:int -> unit -> Server.Jbuffer.buffer
  val formatter : Server.Jbuffer.buffer -> Stdlib.Format.formatter
  val bprintf :
    Server.Jbuffer.buffer ->
    ('a, Stdlib.Format.formatter, unit) Stdlib.format -> 'a
  val append : Server.Jbuffer.buffer -> string -> int -> int -> unit
  val flush : Server.Jbuffer.buffer -> unit -> unit
  val push_tag : Server.Jbuffer.buffer -> Stdlib.Format.stag -> unit
  val pop_tag : Server.Jbuffer.buffer -> Stdlib.Format.stag -> unit
  val contents : Server.Jbuffer.buffer -> Server.Jbuffer.json
  val is_empty : Server.Jbuffer.json -> bool
  val fprintf : Stdlib.Format.formatter -> Server.Jbuffer.json -> unit
end