expr00fold2.ml 111 Bytes
Newer Older
POTTIER Francois's avatar
POTTIER Francois committed
1 2 3 4
type expr =
  | EConst of (int[@opaque])
  | EAdd of expr * expr
  [@@deriving visitors { variety = "fold2" }]