From 20af40fb97b108f78433e7450401770d2a376e4b Mon Sep 17 00:00:00 2001
From: letouzey
Date: Mon, 9 Jul 2012 19:37:46 +0000
Subject: destruct: full compatibility with former _eqn syntax

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15571 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 parsing/g_tactic.ml4 | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/parsing/g_tactic.ml4 b/parsing/g_tactic.ml4
index f24c9af636..5a41086e68 100644
--- a/parsing/g_tactic.ml4
+++ b/parsing/g_tactic.ml4
@@ -455,8 +455,11 @@ GEXTEND Gram
   eqn_ipat:
     [ [ IDENT "eqn"; ":"; id = naming_intropattern -> Some id
       | IDENT "_eqn"; ":"; id = naming_intropattern ->
-        let msg = "Obsolete syntax \"_eqn\" could be replaced by \"eqn\"" in
+        let msg = "Obsolete syntax \"_eqn:H\" could be replaced by \"eqn:H\"" in
         msg_warning (strbrk msg); Some id
+      | IDENT "_eqn" ->
+        let msg = "Obsolete syntax \"_eqn\" could be replaced by \"eqn:?\"" in
+        msg_warning (strbrk msg); Some (loc, IntroAnonymous)
       | -> None ] ]
   ;
   as_name:
-- 
cgit v1.2.3