aboutsummaryrefslogtreecommitdiff
path: root/intf
diff options
context:
space:
mode:
authorArnaud Spiwack2014-07-24 15:49:48 +0200
committerArnaud Spiwack2014-07-24 17:58:38 +0200
commit032833f1de278b6dbb184ee0653b0c275a59c422 (patch)
tree909390437311e6eca393abb6a1bc7c2fb8fd2d17 /intf
parent6b48993748998f0aaaa18ee65a7591d6a083c0f9 (diff)
Distinguish tactics t1;t2 and t1;[t2..].
They used to be the same (and had a single entry in the AST). But now that t2 can be a multi-goal tactic, t1;[t2..] has the semantics of executing t2 in each goal independently.
Diffstat (limited to 'intf')
-rw-r--r--intf/tacexpr.mli9
1 files changed, 6 insertions, 3 deletions
diff --git a/intf/tacexpr.mli b/intf/tacexpr.mli
index 493c0939a5..d5a3328f02 100644
--- a/intf/tacexpr.mli
+++ b/intf/tacexpr.mli
@@ -187,12 +187,15 @@ and ('t,'p,'c,'i,'r,'n,'l) gen_tactic_expr =
| TacAtom of Loc.t * ('t,'p,'c,'i,'r,'n,'l) gen_atomic_tactic_expr
| TacThen of
('t,'p,'c,'i,'r,'n,'l) gen_tactic_expr *
- ('t,'p,'c,'i,'r,'n,'l) gen_tactic_expr array *
- ('t,'p,'c,'i,'r,'n,'l) gen_tactic_expr *
- ('t,'p,'c,'i,'r,'n,'l) gen_tactic_expr array
+ ('t,'p,'c,'i,'r,'n,'l) gen_tactic_expr
| TacThens of
('t,'p,'c,'i,'r,'n,'l) gen_tactic_expr *
('t,'p,'c,'i,'r,'n,'l) gen_tactic_expr list
+ | TacThens3parts of
+ ('t,'p,'c,'i,'r,'n,'l) gen_tactic_expr *
+ ('t,'p,'c,'i,'r,'n,'l) gen_tactic_expr array *
+ ('t,'p,'c,'i,'r,'n,'l) gen_tactic_expr *
+ ('t,'p,'c,'i,'r,'n,'l) gen_tactic_expr array
| TacFirst of ('t,'p,'c,'i,'r,'n,'l) gen_tactic_expr list
| TacComplete of ('t,'p,'c,'i,'r,'n,'l) gen_tactic_expr
| TacSolve of ('t,'p,'c,'i,'r,'n,'l) gen_tactic_expr list