From 1856d60057ac9096c791d71d4282c0cdfef85913 Mon Sep 17 00:00:00 2001
From: Théo Zimmermann
Date: Mon, 15 Jan 2018 13:54:01 +0100
Subject: More tests on brackets with goal selectors (including failures).

---
 test-suite/success/BracketsWithGoalSelector.v | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/test-suite/success/BracketsWithGoalSelector.v b/test-suite/success/BracketsWithGoalSelector.v
index dd032767ca..ed035f5213 100644
--- a/test-suite/success/BracketsWithGoalSelector.v
+++ b/test-suite/success/BracketsWithGoalSelector.v
@@ -4,7 +4,13 @@ Proof.
   2: {
     left.
     exact HA.
+    Fail right. (* No such goal. Try unfocusing with "}". *)
+  }
+  Fail 2: { (* Non-existent goal. *)
+    idtac. (* The idtac is to get a dot, so that IDEs know to stop there. *)
+  1:{ (* Syntactic test: no space before bracket. *)
+    right.
+    exact HB.
+Fail Qed.
   }
-  right.
-  exact HB.
 Qed.
-- 
cgit v1.2.3