From 83f321c19cfd97e386d7bd5f0aca24ea46c43d2b Mon Sep 17 00:00:00 2001
From: Gaetan Gilbert
Date: Fri, 31 Mar 2017 13:53:08 +0200
Subject: Instances should obey universe binders even when defined by tactics.

---
 test-suite/output/UnivBinders.out | 6 ++++++
 test-suite/output/UnivBinders.v   | 7 +++++++
 2 files changed, 13 insertions(+)
 create mode 100644 test-suite/output/UnivBinders.out
 create mode 100644 test-suite/output/UnivBinders.v

(limited to 'test-suite/output')

diff --git a/test-suite/output/UnivBinders.out b/test-suite/output/UnivBinders.out
new file mode 100644
index 0000000000..128bc77673
--- /dev/null
+++ b/test-suite/output/UnivBinders.out
@@ -0,0 +1,6 @@
+bar@{u} = nat
+     : Wrap@{u} Set
+(* u |= Set < u
+         *)
+
+bar is universe polymorphic
diff --git a/test-suite/output/UnivBinders.v b/test-suite/output/UnivBinders.v
new file mode 100644
index 0000000000..d9e89e43c6
--- /dev/null
+++ b/test-suite/output/UnivBinders.v
@@ -0,0 +1,7 @@
+Set Universe Polymorphism.
+Set Printing Universes.
+
+Class Wrap A := wrap : A.
+
+Instance bar@{u} : Wrap@{u} Set. Proof nat.
+Print bar.
-- 
cgit v1.2.3