From 4b14558683a9fc6d0e0f1b5018bfbafc94bb8d3a Mon Sep 17 00:00:00 2001
From: Pierre-Marie Pédrot
Date: Thu, 18 Aug 2016 12:09:42 +0200
Subject: Adding a test for bug #4653.

---
 test-suite/bugs/closed/4653.v | 3 +++
 1 file changed, 3 insertions(+)
 create mode 100644 test-suite/bugs/closed/4653.v

diff --git a/test-suite/bugs/closed/4653.v b/test-suite/bugs/closed/4653.v
new file mode 100644
index 0000000000..4514342c5e
--- /dev/null
+++ b/test-suite/bugs/closed/4653.v
@@ -0,0 +1,3 @@
+Definition T := Type.
+Module Type S. Parameter foo : let A := T in True. End S.
+Module M <: S. Lemma foo (A := T) : True. Proof I. End M.
-- 
cgit v1.2.3