aboutsummaryrefslogtreecommitdiff
path: root/test-suite/bugs
diff options
context:
space:
mode:
authorMatthieu Sozeau2018-06-04 14:05:14 +0200
committerMatthieu Sozeau2018-06-04 14:05:14 +0200
commit10e323fe4cebd1addfe1af32407f1277214d2c7b (patch)
tree9d4bc6e0694fd456933457078acc0e2beaec6c45 /test-suite/bugs
parent01128a2ff774f0ef249ee54a67e88d49ae254a4d (diff)
parent98814890466b2ee4b72235a2591ecd150bff08e7 (diff)
Merge PR #7590: Fix #7586: Anomaly "Uncaught exception Not_found".
Diffstat (limited to 'test-suite/bugs')
-rw-r--r--test-suite/bugs/closed/7392.v9
1 files changed, 9 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/7392.v b/test-suite/bugs/closed/7392.v
new file mode 100644
index 0000000000..cf465c6588
--- /dev/null
+++ b/test-suite/bugs/closed/7392.v
@@ -0,0 +1,9 @@
+Inductive R : nat -> Prop := ER : forall n, R n -> R (S n).
+
+Goal (forall (n : nat), R n -> False) -> True -> False.
+Proof.
+intros H0 H1.
+eapply H0.
+clear H1.
+apply ER.
+simpl.