sig val formatter_of_buffer : Bigbuffer.t -> Format.formatter val bprintf : Bigbuffer.t -> ('a, Format.formatter, unit) Pervasives.format -> 'a end