aboutsummaryrefslogtreecommitdiff
path: root/test-suite/bugs
diff options
context:
space:
mode:
authorHugo Herbelin2020-11-13 20:45:31 +0100
committerHugo Herbelin2020-11-13 20:50:33 +0100
commitc6529d84b9587de4b10bb0ba5ca0ec138d0f2a91 (patch)
tree435a470f4c75804f6f32cca42e37af2be1805799 /test-suite/bugs
parenta10e7b3e470d1f944179c5bc7c85ec5a2c3c4025 (diff)
Fixes #13363: case of a meta not paying attention to being under binders.
In Evar := C[Meta] problems of unification.ml, and C[ ] contains binders, Meta was wrongly considered by pose_all_metas_as_evars as under these binders (while Metas are always defined in the initial context of the unification problem).
Diffstat (limited to 'test-suite/bugs')
-rw-r--r--test-suite/bugs/closed/bug_13363.v17
1 files changed, 17 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/bug_13363.v b/test-suite/bugs/closed/bug_13363.v
new file mode 100644
index 0000000000..cc11aa93b6
--- /dev/null
+++ b/test-suite/bugs/closed/bug_13363.v
@@ -0,0 +1,17 @@
+Axiom X : Type.
+Axiom P : (X -> unit) -> Prop.
+
+Axiom F: unit -> unit.
+Axiom G : unit -> unit.
+
+Lemma Hyp ss':
+ P (fun y : X => ss') ->
+ P (fun y : X => G (F ss')).
+Admitted.
+
+Lemma bug : exists x, P x.
+Proof.
+intros.
+eexists (fun y : X => G _).
+eapply Hyp. cbn beta.
+Abort.