diff options
| author | coqbot-app[bot] | 2020-11-20 09:21:27 +0000 |
|---|---|---|
| committer | GitHub | 2020-11-20 09:21:27 +0000 |
| commit | 122aef582e69f692e6720097a3fac7e0d4d41bcd (patch) | |
| tree | 062a2e1a02e687d5f5fe68b6dd949ee2b4c9dbae /plugins/ltac | |
| parent | 57c85b0d54e54ca33238399cab3285ef34d4edd2 (diff) | |
| parent | 00003b625ed3d5f3f2d79cf38ca6ad08e634432e (diff) | |
Merge PR #13403: Use only nats for occs_nums rather than ints
Reviewed-by: Zimmi48
Reviewed-by: herbelin
Diffstat (limited to 'plugins/ltac')
| -rw-r--r-- | plugins/ltac/g_tactic.mlg | 4 |
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 } ] ] |