val string_of_uri : (uri, string) W.ftval uri_of_string : (string, uri) W.fttype event_handler = stringtype mouse_event_handler = stringtype keyboard_event_handler = stringtype touch_event_handler = stringval encodedpcdata : string wrap -> eltval entity : string -> eltval cdata : string -> eltval cdata_script : string -> eltval cdata_style : string -> elttype 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 listval map_string_attrib :
(aname -> bool) ->
(string -> string) ->
attrib list ->
attrib listval map_string_attrib_in_list :
(aname -> bool) ->
(string -> string) ->
attrib list ->
attrib listval fold :
(unit -> 'a) ->
(string -> 'a) ->
(string -> 'a) ->
(string -> 'a) ->
(string -> 'a) ->
(ename -> attrib list -> 'a) ->
(ename -> attrib list -> 'a list -> 'a) ->
elt ->
'aval all_entities : elt -> string listval print_list :
output:(string -> unit) ->
?encode:(string -> string) ->
elt list ->
unit