type nonrec t = tval declare : Base.String.t -> 'context Context.t -> (Migrate_parsetree.Ast_408.Parsetree.payload, 'a, 'context) Ast_pattern.t -> (ctxt:Expansion_context.Extension.t -> 'a) -> tval declare_inline : Base.String.t -> 'context Context.t -> (Migrate_parsetree.Ast_408.Parsetree.payload, 'a, 'context Base.List.t) Ast_pattern.t -> (ctxt:Expansion_context.Extension.t -> 'a) -> t