aboutsummaryrefslogtreecommitdiff
path: root/test-suite
diff options
context:
space:
mode:
authorMaxime Dénès2017-09-15 10:00:35 +0200
committerMaxime Dénès2017-09-15 10:00:35 +0200
commit6c678a68c081ce24bbdcb092db3f57ef7e171dac (patch)
treed963048adb529427abc19d49f453f276b720df7d /test-suite
parenteb439843c5fd3841aa22b36453c49d9dd07bd770 (diff)
parent49f144daf071dcb4e06be54315bd1e92dbe64d68 (diff)
Merge PR #1002: Partial fix of BZ#5707 ("destruct" on primitive "negative" Inductive-keyworded record failing even on non-dependent goal)
Diffstat (limited to 'test-suite')
-rw-r--r--test-suite/bugs/closed/5707.v12
1 files changed, 12 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/5707.v b/test-suite/bugs/closed/5707.v
new file mode 100644
index 0000000000..785844c66d
--- /dev/null
+++ b/test-suite/bugs/closed/5707.v
@@ -0,0 +1,12 @@
+(* Destruct and primitive projections *)
+
+(* Checking the (superficial) part of #5707:
+ "destruct" should be able to use non-dependent case analysis when
+ dependent case analysis is not available and unneeded *)
+
+Set Primitive Projections.
+
+Inductive foo := Foo { proj1 : nat; proj2 : nat }.
+
+Goal forall x : foo, True.
+Proof. intros x. destruct x.