Commit 83492205 authored by POTTIER Francois's avatar POTTIER Francois

Generate all four visitors in the advanced/ demo.

parent 6fea714f
......@@ -11,6 +11,6 @@ and ('bn, 'fn) term =
| TLam of (('bn, 'fn) tele, ('bn, 'fn) term) bind
| TApp of ('bn, 'fn) term * ('bn, 'fn) term list
[@@deriving visitors { variety = "iter"; ancestors = ["BindingForms.iter"]; public = ["visit_term"] },
visitors { variety = "map"; ancestors = ["BindingForms.map"]; public = ["visit_term"] } (* TEMPORARY ,
visitors { variety = "map"; ancestors = ["BindingForms.map"]; public = ["visit_term"] },
visitors { variety = "endo"; ancestors = ["BindingForms.endo"]; public = ["visit_term"] },
visitors { variety = "iter2"; ancestors = ["BindingForms.iter2"]; public = ["visit_term"] } *)]
visitors { variety = "iter2"; ancestors = ["BindingForms.iter2"]; public = ["visit_term"] }]
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment