Js_of_ocaml_tyxml.Tyxml_js
Tyxml interface. Example of use for HTML:
module T = Tyxml_js.Html
let html = T.(
div ~a:[a_class ["several"; "css"; "class"]; a_id "id-of-div"] [
ul ~a:[a_class ["one-css-class"]; a_id "id-of-ul"] [
li [
a ~a:[a_id "id-of-a"; a_href "/url/file.html"] [
pcdata "Go to /url/file.html"
]
]
]
]
)
module type XML =
Xml_sigs.T
with type uri = string
and type event_handler =
Js_of_ocaml.Dom_html.event Js_of_ocaml.Js.t ->
bool
and type mouse_event_handler =
Js_of_ocaml.Dom_html.mouseEvent Js_of_ocaml.Js.t ->
bool
and type keyboard_event_handler =
Js_of_ocaml.Dom_html.keyboardEvent Js_of_ocaml.Js.t ->
bool
and type elt = Js_of_ocaml.Dom.node Js_of_ocaml.Js.t
module Xml : XML with module W = Xml_wrap.NoWrap
module Register : sig ... end
module Util : sig ... end
module R : sig ... end
module To_dom : Tyxml_cast_sigs.TO with type 'a elt = 'a Html.elt
module Of_dom : Tyxml_cast_sigs.OF with type 'a elt = 'a Html.elt