module MakeWrapped (
W
:
Xml_wrap.T
)
(
Xml
:
Xml_sigs.Wrapped
)
(
Svg
:
Svg_sigs.T
with module Xml := Xml
)
: sig
.. end
module type T = Html5_sigs.T
with type Xml.uri = Xml.uri
and type Xml.event_handler = Xml.event_handler
and type Xml.mouse_event_handler = Xml.mouse_event_handler
and type Xml.keyboard_event_handler = Xml.keyboard_event_handler
and type Xml.attrib = Xml.attrib
and type Xml.elt = Xml.elt
and module Svg := Svg
and type 'a Xml.wrap = 'a W.t
and type 'a wrap = 'a W.t
and type 'a Xml.list_wrap = 'a W.tlist
and type 'a list_wrap = 'a W.tlist