Functor Svg_f.Make
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
Create a new implementation of Svg, using the given underlying Xml implementation. Will output a module of type Svg_sigs.T with the various type equalities.
If your Xml implementation uses a special function wrapping, use Svg_f.Make_with_wrapped_functions.
Parameters :
Xml | : | Xml_sigs.T with type ('a, 'b) W.ft = ('a -> 'b) |