Module Xml_sigs.Iterable_typed_xml.Xml

module Xml: Xml_sigs.Iterable

include Xml_sigs.T

type separator =

`\|`	`Space`
`\|`	`Comma`

val aname : attrib -> aname

type acontent = private

`\|`	`AFloat of float`
`\|`	`AInt of int`
`\|`	`AStr of string`
`\|`	`AStrL of separator * string list`

val acontent : attrib -> acontent

type econtent = private

`\|`	`Empty`
`\|`	`Comment of string`
`\|`	`EncodedPCDATA of string`
`\|`	`PCDATA of string`
`\|`	`Entity of string`
`\|`	`Leaf of ename * attrib list`
`\|`	`Node of ename * attrib list * elt list`

val content : elt -> econtent