Module Basic_types

module Basic_types: sig .. end

type attr = [ `Attr of string | `CamlAttr of string ]

type valeur = [ `CamlVal of string | `Val of string ]

type attribute = [ `Attribute of attr * valeur | `CamlList of string ]

type token =

`\|`	`Tag of (string * attribute list * bool)`
`\|`	`PCData of string`
`\|`	`Endtag of string`
`\|`	`Comment of string`
`\|`	`CamlString of string`
`\|`	`CamlList of string`
`\|`	`CamlExpr of string`
`\|`	`Whitespace of string`
`\|`	`Eof`