Module `Encoder`

type 'a t = Encoder__.Pretty.t -> 'a -> Encoder__.Pretty.t

type ('ty, 'v) order

val keval_order : 
  (Encoder__.Pretty.t -> 'v) ->
  Encoder__.Pretty.t ->
  ('ty, 'v) order ->
  'ty

val break : indent:int -> len:int -> ('v, 'v) order

val fws : ('v, 'v) order

val spaces : int -> ('v, 'v) order

val cut : ('v, 'v) order

val const : 'a t -> 'a -> ('v, 'v) order

val atom : 'a t -> ('a -> 'v, 'v) order

val a : ('a t -> 'a -> 'v, 'v) order

val (!!) : 'a t -> ('a -> 'v, 'v) order

val ($) : 'a t -> 'a -> ('v, 'v) order

val new_line : ('v, 'v) order

val tbox : int -> ('v, 'v) order

val bbox : ('v, 'v) order

val box : ('v, 'v) order

val close : ('v, 'v) order

val using : ('b -> 'a) -> 'a t -> 'b t

val string : string t

val bytes : Bytes.t t

val bigstring : Bigstringaf.t t

val breakable : string t

val char : char t

val list : sep:('x t * 'x) -> 'v t -> 'v list t

val option : 'a t -> 'a option t

type ('ty, 'v) fmt =

val concat : ('a, 'b) fmt -> ('b, 'c) fmt -> ('a, 'c) fmt

val keval : 
  (Encoder__.Pretty.t -> 'v) ->
  Encoder__.Pretty.t ->
  ('ty, 'v) fmt ->
  'ty

val eval : Encoder__.Pretty.t -> ('ty, Encoder__.Pretty.t) fmt -> 'ty

val io_buffer_size : int

val create : 
  ?margin:int ->
  ?new_line:string ->
  emitter:(Encoder__.Enclosure.IOVec.t list -> int) ->
  int ->
  Encoder__.Pretty.t

val is_empty : Encoder__.Pretty.t -> bool

val flush : Encoder__.Pretty.t -> Encoder__.Pretty.t

val kflush : (Encoder__.Pretty.t -> 'a) -> Encoder__.Pretty.t -> 'a

val to_string : 
  ?margin:int ->
  ?new_line:string ->
  (Encoder__.Pretty.t -> 'a -> Encoder__.Pretty.t) ->
  'a ->
  string

val to_stream : 
  ?margin:int ->
  ?new_line:string ->
  (Encoder__.Pretty.t -> 'a -> Encoder__.Pretty.t) ->
  'a ->
  unit ->
  string option

module IOVec : sig ... end

module Buffer : sig ... end

package mrmime