aboutsummaryrefslogtreecommitdiffhomepage
path: root/test-suite/bugs/closed/4198.v
diff options
context:
space:
mode:
authorGravatar Théo Zimmermann <theo.zimmermann@univ-paris-diderot.fr>2018-05-10 10:16:14 +0200
committerGravatar Théo Zimmermann <theo.zimmermann@univ-paris-diderot.fr>2018-05-17 10:36:25 +0200
commit49d73185be33ce521f4664e61d47b2db5d59d608 (patch)
tree794d488d0af99f62494ae124c37312c975ae9704 /test-suite/bugs/closed/4198.v
parentec043e65c084a86594fb815eb65b2734b87018e2 (diff)
Introduce an option to allow nested lemma, and turn it off by default.
Diffstat (limited to 'test-suite/bugs/closed/4198.v')
-rw-r--r--test-suite/bugs/closed/4198.v2
1 files changed, 2 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/4198.v b/test-suite/bugs/closed/4198.v
index eb37141bc..28800ac05 100644
--- a/test-suite/bugs/closed/4198.v
+++ b/test-suite/bugs/closed/4198.v
@@ -13,6 +13,7 @@ Goal forall A (x x' : A) (xs xs' : list A) (H : x::xs = x'::xs'),
match goal with
| [ |- context G[@hd] ] => idtac
end.
+Abort.
(* This second example comes from CFGV where inspecting subterms of a
match is expecting to inspect first the term to match (even though
@@ -35,3 +36,4 @@ Ltac mydestruct :=
Goal forall x, match x with 0 => 0 | _ => 0 end = 0.
intros.
mydestruct.
+Abort.