diff options
| author | Richard Eisenberg <rae@cs.brynmawr.edu> | 2017-06-01 17:27:14 -0400 |
|---|---|---|
| committer | Richard Eisenberg <rae@cs.brynmawr.edu> | 2017-07-27 07:49:05 -0400 |
| commit | 8e15e3d370e9c253ae0dbb330e25b72cb00cdb76 (patch) | |
| tree | 42c5591fef14363207ab3fc86eb58d7293a1c60c /testsuite/tests/polykinds/T9017.stderr | |
| parent | 4a2641578bc91707e06b2f35b0fec63535e9a025 (diff) | |
| download | haskell-8e15e3d370e9c253ae0dbb330e25b72cb00cdb76.tar.gz | |
Improve error messages around kind mismatches.
Previously, when canonicalizing (or unifying, in uType) a
heterogeneous equality, we emitted a kind equality and used the
resulting coercion to cast one side of the heterogeneous equality.
While sound, this led to terrible error messages. (See the bugs
listed below.) The problem is that using the coercion built from
the emitted kind equality is a bit like a wanted rewriting a wanted.
The solution is to keep heterogeneous equalities as irreducible.
See Note [Equalities with incompatible kinds] in TcCanonical.
This commit also removes a highly suspicious switch to FM_SubstOnly
when flattening in the kinds of a type variable. I have no idea
why this was there, other than as a holdover from pre-TypeInType.
I've not left a Note because there is simply no reason I can conceive
of that the FM_SubstOnly should be there.
One challenge with this patch is that the emitted derived equalities
might get emitted several times: when a heterogeneous equality is
in an implication and then gets floated out from the implication,
the Derived is present both in and out of the implication. This
causes a duplicate error message. (Test case:
typecheck/should_fail/T7368) Solution: track the provenance of
Derived constraints and refuse to float out a constraint that has
an insoluble Derived.
Lastly, this labels one test (dependent/should_fail/RAE_T32a)
as expect_broken, because the problem is really #12919. The
different handling of constraints in this patch exposes the error.
This fixes bugs #11198, #12373, #13530, and #13610.
test cases:
typecheck/should_fail/{T8262,T8603,tcail122,T12373,T13530,T13610}
Diffstat (limited to 'testsuite/tests/polykinds/T9017.stderr')
| -rw-r--r-- | testsuite/tests/polykinds/T9017.stderr | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/testsuite/tests/polykinds/T9017.stderr b/testsuite/tests/polykinds/T9017.stderr index 79a9a4617f..d9483c8490 100644 --- a/testsuite/tests/polykinds/T9017.stderr +++ b/testsuite/tests/polykinds/T9017.stderr @@ -1,12 +1,16 @@ T9017.hs:8:7: error: - • Couldn't match kind ‘k’ with ‘*’ - ‘k’ is a rigid type variable bound by + • Couldn't match kind ‘k1’ with ‘*’ + ‘k1’ is a rigid type variable bound by the type signature for: foo :: forall k k1 (a :: k -> k1 -> *) (b :: k) (m :: k -> k1). a b (m b) at T9017.hs:7:1-16 - When matching the kind of ‘a’ + When matching types + a1 :: * -> * -> * + a :: k -> k1 -> * + Expected type: a b (m b) + Actual type: a1 a0 (m0 a0) • In the expression: arr return In an equation for ‘foo’: foo = arr return • Relevant bindings include |