Module `Xml.W`

type 'a t = 'a Xml_shared.W.t

val return : 'a -> 'a t

type ('a, 'b) ft = ('a, 'b) Xml_shared.W.ft

val fmap : ('a, 'b) ft -> 'a t -> 'b t

type 'a tlist = 'a Xml_shared.W.tlist

val nil : unit -> 'a tlist

val singleton : 'a t -> 'a tlist

val cons : 'a t -> 'a tlist -> 'a tlist

val append : 'a tlist -> 'a tlist -> 'a tlist

val map : ('a, 'b) ft -> 'a tlist -> 'b tlist