Parser.Mode
type 'a t =
| Single : Ast.t t
| Many : Ast.t list t
| Many_as_one : Ast.t t
| Cst : Cst.t list t