diff options
| author | Hugo Herbelin | 2014-11-25 13:20:25 +0100 |
|---|---|---|
| committer | Hugo Herbelin | 2014-11-25 13:22:32 +0100 |
| commit | a8ad3abc15a2b7bbf899f8dcaf3baf2ec7fe52f0 (patch) | |
| tree | 4d8a6770b78d0aa7e65a9dca3c9a0204dd4cd718 /tactics/extratactics.ml4 | |
| parent | 31517149593850a369d4e7d7f1b1fbb34016d4a0 (diff) | |
Used an evar name based on the local def name in "evar" tactic.
Diffstat (limited to 'tactics/extratactics.ml4')
| -rw-r--r-- | tactics/extratactics.ml4 | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/tactics/extratactics.ml4 b/tactics/extratactics.ml4 index bf7e8b3487..67e924fd6a 100644 --- a/tactics/extratactics.ml4 +++ b/tactics/extratactics.ml4 @@ -428,6 +428,8 @@ open Evar_tactics (**********************************************************************) (* Evar creation *) +(* TODO: add support for some test similar to g_constr.name_colon so that + expressions like "evar (list A)" do not raise a syntax error *) TACTIC EXTEND evar [ "evar" "(" ident(id) ":" lconstr(typ) ")" ] -> [ let_evar (Name id) typ ] | [ "evar" constr(typ) ] -> [ let_evar Anonymous typ ] |