sig type t val of_map : int -> int Main.Type.UMap.t -> Main.Type.UCharTbl.Bytes.t val get : Main.Type.UCharTbl.Bytes.t -> Main.Type.UChar.t -> int end