aboutsummaryrefslogtreecommitdiffhomepage
path: root/test-suite/bugs/closed/3825.v
diff options
context:
space:
mode:
authorGravatar Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr>2016-05-03 15:06:11 +0200
committerGravatar Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr>2016-05-03 16:05:08 +0200
commitb6e796a8ef956fa25bfeba84545f25b2cfb3aaf9 (patch)
treeda87235dd73f6425ea980100894ccc910a0ec877 /test-suite/bugs/closed/3825.v
parent00a13c3c014e2729d17ad8e8191f20586ae3b52b (diff)
Fix bug #3825: Universe annotations on notations should pass through or be rejected.
Diffstat (limited to 'test-suite/bugs/closed/3825.v')
-rw-r--r--test-suite/bugs/closed/3825.v16
1 files changed, 16 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/3825.v b/test-suite/bugs/closed/3825.v
new file mode 100644
index 000000000..e594b74b6
--- /dev/null
+++ b/test-suite/bugs/closed/3825.v
@@ -0,0 +1,16 @@
+Set Universe Polymorphism.
+Set Printing Universes.
+
+Axiom foo@{i j} : Type@{i} -> Type@{j}.
+
+Notation bar := foo.
+
+Monomorphic Universes i j.
+
+Check bar@{i j}.
+Fail Check bar@{i}.
+
+Notation qux := (nat -> nat).
+
+Fail Check qux@{i}.
+