From 77ed451903a18b583e443367d864d04c2b3f3a20 Mon Sep 17 00:00:00 2001
From: Robbert Krebbers <mail@robbertkrebbers.nl>
Date: Tue, 13 Aug 2019 13:19:17 +0200
Subject: [PATCH] Attempt at fixing compilation with Coq 8.7.2.
---
theories/proofmode/ltac_tactics.v | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/theories/proofmode/ltac_tactics.v b/theories/proofmode/ltac_tactics.v
index 05fd8521a..6230733d0 100644
--- a/theories/proofmode/ltac_tactics.v
+++ b/theories/proofmode/ltac_tactics.v
@@ -574,7 +574,7 @@ Local Tactic Notation "iForallRevert" ident(x) :=
let H := pretty_ident H in fail 2 "iRevert:" x "is used in hypothesis" H
end) in
iStartProof;
- first [let _ := type of x in idtac|fail 1 "iRevert:" x "not in scope"];
+ first [let A := type of x in idtac|fail 1 "iRevert:" x "not in scope"];
let A := type of x in
lazymatch type of A with
| Prop => revert x; first [apply tac_pure_revert|err x]
--
GitLab