diff options
| author | herbelin | 2006-10-24 12:55:46 +0000 |
|---|---|---|
| committer | herbelin | 2006-10-24 12:55:46 +0000 |
| commit | 6dceb3df36d30ad32db7e73713e7f7dee083e872 (patch) | |
| tree | a929ebb6ad7aae06b05c32b1515db924f4761d5f /proofs | |
| parent | f1248d64c25602d75d069b07b51a8b4f751415b2 (diff) | |
Extension de la primitive ltac fresh pour qu'elle accepte une liste de
noms et de chaînes qu'elle va concaténer pour créer un nom.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@9267 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'proofs')
| -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 1dc822a27c..662b268f64 100644 --- a/proofs/tacexpr.ml +++ b/proofs/tacexpr.ml @@ -234,7 +234,7 @@ and ('constr,'pat,'cst,'ind,'ref,'id,'tac) gen_tactic_arg = 'ref * ('constr,'pat,'cst,'ind,'ref,'id,'tac) gen_tactic_arg list | TacExternal of loc * string * string * ('constr,'pat,'cst,'ind,'ref,'id,'tac) gen_tactic_arg list - | TacFreshId of string option + | TacFreshId of string or_var list | Tacexp of 'tac (* Globalized tactics *) |