unit ->
unit
+ (* given an utf8 string a floc returns the parsed substring and its length
+ * in bytes *)
+val utf8_parsed_text: string -> Token.flocation -> string * int
+
+ (* the length in characters, not bytes *)
+val utf8_string_length: string -> int
+
+