sig
  val utf_8_segments : Uuseg.boundary -> string -> string list
  val utf_8_grapheme_clusters : string -> string list
end