sig   type 'a folder = '-> string -> 'a   val fold_utf_8 :     [< Uuseg.boundary ] -> 'Uuseg_string.folder -> '-> string -> 'a   val fold_utf_16be :     [< Uuseg.boundary ] -> 'Uuseg_string.folder -> '-> string -> 'a   val fold_utf_16le :     [< Uuseg.boundary ] -> 'Uuseg_string.folder -> '-> string -> 'a   val pp_utf_8 : Format.formatter -> string -> unit   val pp_utf_8_text : Format.formatter -> string -> unit   val pp_utf_8_lines : Format.formatter -> string -> unit end