module Svg_f:sig
..end
This module is experimental, it may lack of some attributes, and the interface is very low level and do not take deeply into account the needs of SVG elements.
module Make(
Xml
:
Xml_sigs.T
with type ('a, 'b) W.ft = ('a -> 'b)
)
:Svg_sigs.Make(Xml).T
with type +'a elt = Xml.elt and type +'a attrib = Xml.attrib
Svg
, using the given underlying Xml
implementation.
module Wrapped_functions(
Xml
:
Xml_sigs.T
with type ('a, 'b) W.ft = 'a -> 'b
)
:Svg_sigs.Wrapped_functions
with module Xml = Xml
W.ft
is the regular function.
module Make_with_wrapped_functions(
Xml
:
Xml_sigs.T
)
(
C
:
Svg_sigs.Wrapped_functions
with module Xml = Xml
)
:Svg_sigs.Make(Xml).T
with type +'a elt = Xml.elt and type +'a attrib = Xml.attrib
Svg_f.Make
but with a custom set of wrapped functions.