anil.recoil.org
OCaml HTML5 parser/serialiser based on Python's JustHTML
1type t =
2 | Metadata
3 | Flow
4 | Sectioning
5 | Heading
6 | Phrasing
7 | Embedded
8 | Interactive
9 | Palpable
10 | Script_supporting
11 | Form_associated
12 | Listed
13 | Labelable
14 | Submittable
15 | Resettable
16 | Autocapitalize_inheriting
17 | Transparent
18
19let to_string = function
20 | Metadata -> "metadata"
21 | Flow -> "flow"
22 | Sectioning -> "sectioning"
23 | Heading -> "heading"
24 | Phrasing -> "phrasing"
25 | Embedded -> "embedded"
26 | Interactive -> "interactive"
27 | Palpable -> "palpable"
28 | Script_supporting -> "script-supporting"
29 | Form_associated -> "form-associated"
30 | Listed -> "listed"
31 | Labelable -> "labelable"
32 | Submittable -> "submittable"
33 | Resettable -> "resettable"
34 | Autocapitalize_inheriting -> "autocapitalize-inheriting"
35 | Transparent -> "transparent"
36
37let compare (a : t) (b : t) = Stdlib.compare a b
38
39let equal (a : t) (b : t) = a = b