From 5c5790d587ad425a882ea8bcdcf28d5ac046aaa3 Mon Sep 17 00:00:00 2001
From: Pierre-Marie Pédrot
Date: Tue, 15 Oct 2019 21:33:31 +0200
Subject: Fix a De Bruijn bug in the computation of term relevance in the
 kernel.

Opening up a lambda should always lift the substitution attached to it.
---
 test-suite/bugs/closed/bug_10904.v | 8 ++++++++
 1 file changed, 8 insertions(+)
 create mode 100644 test-suite/bugs/closed/bug_10904.v

(limited to 'test-suite')

diff --git a/test-suite/bugs/closed/bug_10904.v b/test-suite/bugs/closed/bug_10904.v
new file mode 100644
index 0000000000..32b25ff726
--- /dev/null
+++ b/test-suite/bugs/closed/bug_10904.v
@@ -0,0 +1,8 @@
+Definition a := fun (P:SProp) (p:P) => p.
+
+Lemma foo : (let k := a in let k' := a in fun (x:nat) y => x) = (let k := a in fun x y => y).
+Proof.
+  Fail reflexivity.
+  match goal with |- ?l = _ => exact_no_check (eq_refl l) end.
+Fail Qed.
+Abort.
-- 
cgit v1.2.3