aboutsummaryrefslogtreecommitdiff
path: root/plugins
diff options
context:
space:
mode:
authorcoqbot-app[bot]2020-11-20 09:21:27 +0000
committerGitHub2020-11-20 09:21:27 +0000
commit122aef582e69f692e6720097a3fac7e0d4d41bcd (patch)
tree062a2e1a02e687d5f5fe68b6dd949ee2b4c9dbae /plugins
parent57c85b0d54e54ca33238399cab3285ef34d4edd2 (diff)
parent00003b625ed3d5f3f2d79cf38ca6ad08e634432e (diff)
Merge PR #13403: Use only nats for occs_nums rather than ints
Reviewed-by: Zimmi48 Reviewed-by: herbelin
Diffstat (limited to 'plugins')
-rw-r--r--plugins/ltac/g_tactic.mlg4
1 files changed, 1 insertions, 3 deletions
diff --git a/plugins/ltac/g_tactic.mlg b/plugins/ltac/g_tactic.mlg
index 236de65462..dbacacab4a 100644
--- a/plugins/ltac/g_tactic.mlg
+++ b/plugins/ltac/g_tactic.mlg
@@ -234,9 +234,7 @@ GRAMMAR EXTEND Gram
;
occs_nums:
[ [ nl = LIST1 nat_or_var -> { OnlyOccurrences nl }
- | "-"; n = nat_or_var; nl = LIST0 int_or_var ->
- (* have used int_or_var instead of nat_or_var for compatibility *)
- { AllOccurrencesBut (List.map (Locusops.or_var_map abs) (n::nl)) } ] ]
+ | "-"; nl = LIST1 nat_or_var -> { AllOccurrencesBut nl } ] ]
;
occs:
[ [ "at"; occs = occs_nums -> { occs } | -> { AllOccurrences } ] ]