Attribute.Floating
module Context : sig ... end
val declare :
string ->
'a Context.t ->
(Astlib.Ast_500.Parsetree.payload, 'b, 'c) Ast_pattern.t ->
'b ->
('a, 'c) t
val name : (_, _) t -> string
val convert_res :
('a, 'b) t list ->
'a ->
('b option, Location.Error.t Stdppx.NonEmptyList.t) result
val convert : ('a, 'b) t list -> 'a -> 'b option