aboutsummaryrefslogtreecommitdiffhomepage
path: root/test-suite/failure
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/failure')
-rw-r--r--test-suite/failure/rewrite_in_hyp2.v8
1 files changed, 8 insertions, 0 deletions
diff --git a/test-suite/failure/rewrite_in_hyp2.v b/test-suite/failure/rewrite_in_hyp2.v
new file mode 100644
index 000000000..a32037a21
--- /dev/null
+++ b/test-suite/failure/rewrite_in_hyp2.v
@@ -0,0 +1,8 @@
+(* Until revision 10221, rewriting in hypotheses of the form
+ "(fun x => phi(x)) t" with "t" not rewritable used to behave as a
+ beta-normalization tactic instead of raising the expected message
+ "nothing to rewrite" *)
+
+Goal forall b, S b = O -> (fun a => 0 = (S a)) b -> True.
+ intros b H H0.
+ rewrite H in H0.