Warning: Reason support is experimental. We are looking for beta-tester and contributors.

Functor Html5_f.Make

module Make (Xml : Xml_sigs.T     with type ('a, 'b) W.ft = 'a -> 'b) 
   (Svg : Svg_sigs.T     with module Xml := Xml) : 
  
  Html5_sigs.Make(Xml)(Svg).T
    with type +'a elt = Xml.elt
     and type +'a attrib = Xml.attrib

Parameters :

Xml	:	Xml_sigs.T with type ('a, 'b) W.ft = 'a -> 'b
Svg	:	Svg_sigs.T with module Xml := Xml