type t = xstringval length : xstring -> intval clear : xstring -> unitval reset : xstring -> unitval add_text : xstring -> 'a UText.text -> unitval shrink : xstring -> int -> unitval ustring_of : xstring -> UText.ustringmodule Buf : sig ... end