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