expr12.ml 122 Bytes
Newer Older
1 2 3 4
type 'expr oexpr =
  | EConst of int
  | EAdd of 'expr * 'expr
  [@@deriving visitors { name = "omap"; variety = "map" }]