summaryrefslogtreecommitdiff
path: root/test-suite/bugs/closed/3297.v
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/bugs/closed/3297.v')
-rw-r--r--test-suite/bugs/closed/3297.v12
1 files changed, 12 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/3297.v b/test-suite/bugs/closed/3297.v
new file mode 100644
index 00000000..1cacb97f
--- /dev/null
+++ b/test-suite/bugs/closed/3297.v
@@ -0,0 +1,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 *)