Reference.Label
type t = [
| `Resolved of Resolved.Label.t
| `Root of string * [ `TLabel | `TUnknown ]
| `Dot of LabelParent.t * string
| `Label of LabelParent.t * Names.LabelName.t
]