diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2009-09-10 18:39:18 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2009-09-10 18:39:18 +0000 |
| commit | e6ff6b0714a02a9d322360b66b4ae19423191345 (patch) | |
| tree | 2a69f5a64247839631ec13fd1928e32f9cb2af90 /proofs/tacexpr.ml | |
| parent | f1500c486fb22a7a5279425b13f7f84d290cbdda (diff) | |
Added syntax "exists bindings, ..., bindings" for iterated "exists".
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12316 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'proofs/tacexpr.ml')
| -rw-r--r-- | proofs/tacexpr.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/proofs/tacexpr.ml b/proofs/tacexpr.ml index 65b330c3d..f53327249 100644 --- a/proofs/tacexpr.ml +++ b/proofs/tacexpr.ml @@ -197,7 +197,7 @@ type ('constr,'pat,'cst,'ind,'ref,'id,'tac) gen_atomic_tactic_expr = (* Constructors *) | TacLeft of evars_flag * 'constr bindings | TacRight of evars_flag * 'constr bindings - | TacSplit of evars_flag * split_flag * 'constr bindings + | TacSplit of evars_flag * split_flag * 'constr bindings list | TacAnyConstructor of evars_flag * 'tac option | TacConstructor of evars_flag * int or_metaid * 'constr bindings |