module Variant_case:sig
..end
type
t = {
|
label : |
|
ctyp : |
|
poly : |
|
arity : |
|
index : |
|
arity_index : |
val expr : loc:Camlp4.PreCast.Ast.loc ->
t -> Camlp4.PreCast.Ast.expr
val patt : loc:Camlp4.PreCast.Ast.loc ->
t -> Camlp4.PreCast.Ast.patt
val ocaml_repr : loc:Camlp4.PreCast.Ast.loc ->
t -> Camlp4.PreCast.Ast.expr