summaryrefslogtreecommitdiff
path: root/test-suite/bugs/closed/4221.v
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/bugs/closed/4221.v')
-rw-r--r--test-suite/bugs/closed/4221.v9
1 files changed, 9 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/4221.v b/test-suite/bugs/closed/4221.v
new file mode 100644
index 00000000..bc120fb1
--- /dev/null
+++ b/test-suite/bugs/closed/4221.v
@@ -0,0 +1,9 @@
+(* Some test checking that interpreting binder names using ltac
+ context does not accidentally break the bindings *)
+
+Goal (forall x : nat, x = 1 -> False) -> 1 = 1 -> False.
+ intros H0 x.
+ lazymatch goal with
+ | [ x : forall k : nat, _ |- _ ]
+ => specialize (fun H0 => x 1 H0)
+ end.