aboutsummaryrefslogtreecommitdiff
path: root/ltac
diff options
context:
space:
mode:
authorCyprien Mangin2016-06-03 08:07:30 +0200
committerCyprien Mangin2016-06-14 06:21:30 +0200
commit591b3c37c980a092f0d2abadd8bdf23de3a38bcb (patch)
tree179736f620e7ccfc953ff7ff4ba2fd7973015e15 /ltac
parentdae4d95910bbdfabe8a8436ab954092ef4773e7d (diff)
Fix usage of Pervasives in goal selectors.
Diffstat (limited to 'ltac')
-rw-r--r--ltac/g_ltac.ml42
1 files changed, 1 insertions, 1 deletions
diff --git a/ltac/g_ltac.ml4 b/ltac/g_ltac.ml4
index e4c3dca28d..b9ed42e412 100644
--- a/ltac/g_ltac.ml4
+++ b/ltac/g_ltac.ml4
@@ -343,7 +343,7 @@ let vernac_solve n info tcom b =
if not status then Feedback.feedback Feedback.AddedAxiom
let pr_range_selector (i, j) =
- if i = j then int i
+ if Int.equal i j then int i
else int i ++ str "-" ++ int j
let pr_ltac_selector = function