`sig
type mutability = [ `Immutable | `Mutable ]
type 'a text
type utext = [ `Immutable ] CamomileLibrary.UText.text
type ustring = [ `Mutable ] CamomileLibrary.UText.text
type t = CamomileLibrary.UText.utext
val utext_of_ustring :
CamomileLibrary.UText.ustring -> CamomileLibrary.UText.utext
val ustring_of_utext :
CamomileLibrary.UText.utext -> CamomileLibrary.UText.ustring
val get : 'a CamomileLibrary.UText.text -> int -> CamomileLibrary.UChar.t
val set :
CamomileLibrary.UText.ustring -> int -> CamomileLibrary.UChar.t -> unit
type index
val look :
'a CamomileLibrary.UText.text ->
CamomileLibrary.UText.index -> CamomileLibrary.UChar.t
val nth :
'a CamomileLibrary.UText.text -> int -> CamomileLibrary.UText.index
val first : 'a CamomileLibrary.UText.text -> CamomileLibrary.UText.index
val last : 'a CamomileLibrary.UText.text -> CamomileLibrary.UText.index
val out_of_range :
'a CamomileLibrary.UText.text -> CamomileLibrary.UText.index -> bool
val compare_index :
'a CamomileLibrary.UText.text ->
CamomileLibrary.UText.index -> CamomileLibrary.UText.index -> int
val next :
'a CamomileLibrary.UText.text ->
CamomileLibrary.UText.index -> CamomileLibrary.UText.index
val prev :
'a CamomileLibrary.UText.text ->
CamomileLibrary.UText.index -> CamomileLibrary.UText.index
val move :
'a CamomileLibrary.UText.text ->
CamomileLibrary.UText.index -> int -> CamomileLibrary.UText.index
val length : 'a CamomileLibrary.UText.text -> int
val of_string : string -> CamomileLibrary.UText.utext
val init :
int -> (int -> CamomileLibrary.UChar.t) -> CamomileLibrary.UText.utext
val init_ustring :
int -> (int -> CamomileLibrary.UChar.t) -> CamomileLibrary.UText.ustring
val make : int -> CamomileLibrary.UChar.t -> CamomileLibrary.UText.ustring
val copy : CamomileLibrary.UText.ustring -> CamomileLibrary.UText.ustring
val sub :
'a CamomileLibrary.UText.text ->
int -> int -> 'a CamomileLibrary.UText.text
val fill :
CamomileLibrary.UText.ustring ->
int -> int -> CamomileLibrary.UChar.t -> unit
val blit :
'a CamomileLibrary.UText.text ->
int -> CamomileLibrary.UText.ustring -> int -> int -> unit
val append :
'a CamomileLibrary.UText.text ->
'b CamomileLibrary.UText.text -> 'a CamomileLibrary.UText.text
val iter :
(CamomileLibrary.UChar.t -> unit) ->
'a CamomileLibrary.UText.text -> unit
val compare :
'a CamomileLibrary.UText.text -> 'b CamomileLibrary.UText.text -> int
module Buf :
sig
type buf
val create : int -> CamomileLibrary.UText.Buf.buf
val contents : CamomileLibrary.UText.Buf.buf -> CamomileLibrary.UText.t
val contents_string :
CamomileLibrary.UText.Buf.buf -> CamomileLibrary.UText.ustring
val length : CamomileLibrary.UText.Buf.buf -> int
val clear : CamomileLibrary.UText.Buf.buf -> unit
val reset : CamomileLibrary.UText.Buf.buf -> unit
val add_char :
CamomileLibrary.UText.Buf.buf -> CamomileLibrary.UChar.t -> unit
val add_string :
CamomileLibrary.UText.Buf.buf ->
'a CamomileLibrary.UText.text -> unit
val add_buffer :
CamomileLibrary.UText.Buf.buf ->
CamomileLibrary.UText.Buf.buf -> unit
end
end`