diff options
author | Maxime Dénès <mail@maximedenes.fr> | 2018-02-12 10:17:52 +0100 |
---|---|---|
committer | Maxime Dénès <mail@maximedenes.fr> | 2018-02-12 10:17:52 +0100 |
commit | 67b6583a2cc430c9584e259a00ff6b28347d5b55 (patch) | |
tree | bf4f98135c59cb695710c6234647f43a48224c4a /test-suite/bugs | |
parent | f593be83d8f53857ae5dac9adc293c86fd9fe0bc (diff) | |
parent | 885307fc52e02d98c48851d0a07e8f9b64d975b0 (diff) |
Merge PR #1047: Support universe instances on the literal Type
Diffstat (limited to 'test-suite/bugs')
-rw-r--r-- | test-suite/bugs/closed/5726.v | 34 |
1 files changed, 34 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/5726.v b/test-suite/bugs/closed/5726.v new file mode 100644 index 000000000..53ef47357 --- /dev/null +++ b/test-suite/bugs/closed/5726.v @@ -0,0 +1,34 @@ +Set Universe Polymorphism. +Set Printing Universes. + +Module GlobalReference. + + Definition type' := Type. + Notation type := type'. + Check type@{Set}. + +End GlobalReference. + +Module TypeLiteral. + + Notation type := Type. + Check type@{Set}. + Check type@{Prop}. + +End TypeLiteral. + +Module ExplicitSort. + Monomorphic Universe u. + Notation foo := Type@{u}. + Fail Check foo@{Set}. + Fail Check foo@{u}. + + Notation bar := Type. + Check bar@{u}. +End ExplicitSort. + +Module PropNotationUnsupported. + Notation foo := Prop. + Fail Check foo@{Set}. + Fail Check foo@{Type}. +End PropNotationUnsupported. |