sig
type 'a t
val make :
?buffer:[ `clear of int | `reset of int ] ->
to_string:('a -> string) -> unit -> 'a Biocaml_transform.Printer_queue.t
val feed : 'a Biocaml_transform.Printer_queue.t -> 'a -> unit
val flush : 'a Biocaml_transform.Printer_queue.t -> string
val is_empty : 'a Biocaml_transform.Printer_queue.t -> bool
end