val string_of_uri : (uri, string) W.ft
val uri_of_string : (string, uri) W.ft
type event_handler = string
type mouse_event_handler = string
type keyboard_event_handler = string
type touch_event_handler = string
val encodedpcdata : string wrap -> elt
val entity : string -> elt
val cdata : string -> elt
val cdata_script : string -> elt
val cdata_style : string -> elt
type separator =
| Space
| Comma
type acontent = private
| AFloat of float
| AInt of int
| AStr of string
| AStrL of separator * string list
type econtent = private
| Empty
| EncodedPCDATA of string
| PCDATA of string
| Entity of string
| Leaf of ename * attrib list
| Node of ename * attrib list * elt list
val rm_attrib_from_list :
(aname -> bool) ->
(string -> bool) ->
attrib list ->
attrib list
val map_string_attrib :
(aname -> bool) ->
(string -> string) ->
attrib list ->
attrib list
val map_string_attrib_in_list :
(aname -> bool) ->
(string -> string) ->
attrib list ->
attrib list
val fold :
(unit -> 'a) ->
(string -> 'a) ->
(string -> 'a) ->
(string -> 'a) ->
(string -> 'a) ->
(ename -> attrib list -> 'a) ->
(ename -> attrib list -> 'a list -> 'a) ->
elt ->
'a
val all_entities : elt -> string list
val print_list :
output:(string -> unit) ->
?encode:(string -> string) ->
elt list ->
unit