sig val encode : ?pos:int -> ?len:int -> string -> string val decode : ?pos:int -> ?len:int -> string -> string end