summaryrefslogtreecommitdiff
path: root/test-suite/failure/rewrite_in_hyp2.v
blob: 1533966efe0557d30e5baf608143c233466c6dde (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.
  rewrite H in H0.