summaryrefslogtreecommitdiff
path: root/test-suite/bugs/closed/3297.v
blob: 1cacb97ff36a0b4b83f2edbd17f3068c4dc812d3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
Goal forall (n : nat) (H := eq_refl : n = n) (H' : n = 0), H = eq_refl.
  intros.
  subst. (* Toplevel input, characters 15-20:
Error: Abstracting over the term "n" leads to a term
"λ n : nat, H = eq_refl" which is ill-typed. *)
  Undo.
  revert H.
  subst. (* success *)
  Undo.
  intro.
  clearbody H.
  subst. (* success *)