aboutsummaryrefslogtreecommitdiff
path: root/test-suite/bugs/closed/bug_3297.v
blob: da8390c475cb0d131c0c1022c8bd7cbef37ccb2a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
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 *)
Abort.