diff options
| author |  Jason Gross <jgross@mit.edu> | 2014-04-08 01:42:49 -0400 |
|---|---|---|
| committer |  Matthieu Sozeau <mattam@mattam.org> | 2014-05-10 15:39:55 +0200 |
| commit | 8cc25de5e1c07fe93bba85c3792e5c4153066e5c (patch) | |
| tree | 52c53213b1b3dfa13155feb752aaa5d257f84e66 /test-suite/bugs/opened/HoTT_coq_034.v | |
| parent | c7284415e4bdd3315c84c7d15d140d3fee000bc5 (diff) | |
Add appropriate Fail(s) to opened bugs
The contract is that a file in bugs/opened should not raise errors if
the bug is still open.
Some of them fail for different reasons than they used to; I'm not sure
what to do about these.
Diffstat (limited to 'test-suite/bugs/opened/HoTT_coq_034.v')
| -rw-r--r-- | test-suite/bugs/opened/HoTT_coq_034.v | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/test-suite/bugs/opened/HoTT_coq_034.v b/test-suite/bugs/opened/HoTT_coq_034.v index 9697928ff..3c2b7a7d6 100644 --- a/test-suite/bugs/opened/HoTT_coq_034.v +++ b/test-suite/bugs/opened/HoTT_coq_034.v @@ -14,7 +14,7 @@ Module Short. Set Printing Universes. Check bar nat Set : Set. (* success *) - Check foo nat Set : Set. (* Toplevel input, characters 6-17: + Fail Check foo nat Set : Set. (* Toplevel input, characters 6-17: Error: The term "foo (* Top.303 Top.304 *) nat Set" has type "Type (* Top.304 *)" while it is expected to have type @@ -97,8 +97,8 @@ SpecializedFunctor C D.] gets rid of the universe inconsistency. *) Let TypeCatC := FunctorCategory C TypeCat. Let YC := (Yoneda C). Set Printing Universes. - Check @FunctorProduct' C TypeCatC (Yoneda C). - (* Toplevel input, characters 35-43: + Fail Check @FunctorProduct' C TypeCatC (Yoneda C). + (* Toplevel input, characters 35-43: Error: In environment objC : Type (* Top.186 *) @@ -123,5 +123,6 @@ while it is expected to have type "Functor (* Top.216 Top.219 Top.217 Top.220 *) C TypeCatC" (Universe inconsistency: Cannot enforce Top.230 = Top.217 because Top.217 <= Top.227 < Top.225 <= Top.231 <= Top.230)). - *) + *) + End FullyFaithful. End Long. |