diff options
Diffstat (limited to 'intf/tacexpr.mli')
| -rw-r--r-- | intf/tacexpr.mli | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/intf/tacexpr.mli b/intf/tacexpr.mli index 379dd59d39..c15ef0dd44 100644 --- a/intf/tacexpr.mli +++ b/intf/tacexpr.mli @@ -34,6 +34,12 @@ type clear_flag = bool option (* true = clear hyp, false = keep hyp, None = use type debug = Debug | Info | Off (* for trivial / auto / eauto ... *) +type goal_selector = + | SelectNth of int + | SelectList of (int * int) list + | SelectId of Id.t + | SelectAll + type 'a core_induction_arg = | ElimOnConstr of 'a | ElimOnIdent of Id.t located @@ -269,6 +275,7 @@ and 'a gen_tactic_expr = ('p,'a gen_tactic_expr) match_rule list | TacFun of 'a gen_tactic_fun_ast | TacArg of 'a gen_tactic_arg located + | TacSelect of goal_selector * 'a gen_tactic_expr (* For ML extensions *) | TacML of Loc.t * ml_tactic_entry * 'a gen_tactic_arg list (* For syntax extensions *) |