From 7999c5b1dce41a9b4c2502c80a1560cee853a818 Mon Sep 17 00:00:00 2001
From: Jacques-Henri Jourdan <jacques-henri.jourdan@normalesup.org>
Date: Sun, 4 Mar 2018 00:13:49 +0100
Subject: [PATCH] Error message for iAccu.

---
 theories/proofmode/tactics.v | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/theories/proofmode/tactics.v b/theories/proofmode/tactics.v
index 87772c5fb..0ee9a0622 100644
--- a/theories/proofmode/tactics.v
+++ b/theories/proofmode/tactics.v
@@ -1937,7 +1937,7 @@ Tactic Notation "iInv" constr(N) "with" constr(Hs) "as" "(" simple_intropattern(
    iInvCore N with Hs as (fun H => iDestructHyp H as (x1 x2 x3 x4) pat) Hclose.
 
 Tactic Notation "iAccu" :=
-  eapply tac_accu; env_reflexivity.
+  eapply tac_accu; [env_reflexivity || fail "iAccu: not an evar."].
 
 Hint Extern 0 (_ ⊢ _) => iStartProof.
 
-- 
GitLab