aboutsummaryrefslogtreecommitdiff
path: root/tactics/extratactics.ml4
diff options
context:
space:
mode:
authorglondu2007-12-07 23:21:07 +0000
committerglondu2007-12-07 23:21:07 +0000
commitd0f57e4e8b9d8feaadf96a241d3546ba061eb20c (patch)
treec5543fd14d187ccd6fe47d295718c802cb5b24e7 /tactics/extratactics.ml4
parent47c78072c71b34c4c5469736367234f43203e7c9 (diff)
Adding the tactic "instantiate" (without argument), to force the
instantiation of evars in tacticals (cf r9985, r10294). git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10356 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tactics/extratactics.ml4')
-rw-r--r--tactics/extratactics.ml43
1 files changed, 2 insertions, 1 deletions
diff --git a/tactics/extratactics.ml4 b/tactics/extratactics.ml4
index 3ddb4188bf..ef6ac60f44 100644
--- a/tactics/extratactics.ml4
+++ b/tactics/extratactics.ml4
@@ -290,16 +290,17 @@ TACTIC EXTEND evar
END
open Tacexpr
+open Tacticals
TACTIC EXTEND instantiate
[ "instantiate" "(" integer(i) ":=" raw(c) ")" hloc(hl) ] ->
[instantiate i c hl ]
+| [ "instantiate" ] -> [ tclNORMEVAR ]
END
(** Nijmegen "step" tactic for setoid rewriting *)
-open Tacticals
open Tactics
open Tactics
open Libnames