path: root/discocaml/ast.ml

type expr = Foo [@@deriving show { with_path = false }]

let expr_of_parsetree : Parsetree.expression -> expr = function _ -> Foo