type print_kind = [ `Env | `Coer ]
type 'term macro =
+ (* Whelp's stuff *)
+ | WHint of loc * 'term
+ | WMatch of loc * 'term
+ | WInstance of loc * 'term
+ | WLocate of loc * string
+ | WElim of loc * 'term
+ (* real macros *)
| Abort of loc
| Print of loc * string
| Check of loc * 'term
| Hint of loc
- | Match of loc * 'term
- | Instance of loc * 'term
| Quit of loc
| Redo of loc * int option
| Undo of loc * int option