type serialiser = { buf : string ref; sz : int; pos : int ref; }
val flush : serialiser -> unit
val serialise : serialiser -> Types.chunk -> unit
val create : serialiser
val print_debug : serialiser -> unit