Attempt at fixing compilation with Coq 8.7.2.

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]