summaryrefslogtreecommitdiff
path: root/test-suite/failure/rewrite_in_hyp2.v
blob: 112a856e32f4221e024ecd16b27b56f60b3b8c6e (plain)
1
2
3
4
5
6
7
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.
  Fail rewrite H in H0.