diff options
| author | msozeau | 2008-04-12 16:01:36 +0000 |
|---|---|---|
| committer | msozeau | 2008-04-12 16:01:36 +0000 |
| commit | 1ea4a8d26516af14670cc677a5a0fce04b90caf7 (patch) | |
| tree | f97ad5097f4a5ef3eb3c71e2affb646f22d3ec51 /parsing | |
| parent | df77da121b86c64a91ea729f39afc92f10676893 (diff) | |
Adding 'at' to rewrite, as it is already implemented in setoid_rewrite.
Uses setoid_rewrite even if rewriting with leibniz if there are
specified occurences, maybe a combination of pattern and rewrite could
be done instead. Correct spelling of occurrences.
Coq does not compile with this patch, the next one will make it compile
again.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10781 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/g_tactic.ml4 | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/parsing/g_tactic.ml4 b/parsing/g_tactic.ml4 index 5e50e9859d..522022bb32 100644 --- a/parsing/g_tactic.ml4 +++ b/parsing/g_tactic.ml4 @@ -277,6 +277,8 @@ GEXTEND Gram {onhyps=Some hl; onconcl=b; concl_occs=occs} | "in"; hl=LIST0 hypident_occ SEP"," -> {onhyps=Some hl; onconcl=false; concl_occs=[]} + | occs=occurrences -> + {onhyps=Some[]; onconcl=true; concl_occs=occs} | -> {onhyps=Some[]; onconcl=true; concl_occs=[]} ] ] ; |