GHC unexpectedly refines explicit kind signatures
The following program should be rejected by the type checker:
{-# LANGUAGE PolyKinds, FunctionalDependencies, MultiParamTypeClasses #-}
class MonoidalCCC (f :: x -> y) (d :: y -> y -> *) | f -> d where
ret :: d a (f a)Instead it is accepted, but the kind variables specified above are 'corrected' during typechecking to:
>>> :browse
class MonoidalCCC (f :: x -> x) (d :: x -> x -> *) | f -> d where
ret :: d a (f a)This may be similar in root cause to issue #9200 (closed), but there a valid program is rejected, and here an invalid program is accepted, so the fixes may be quite different.
It seems these kind variables are just being allowed to unify rather than being checked for subsumption.
Trac metadata
| Trac field | Value |
|---|---|
| Version | 7.8.2 |
| Type | Bug |
| TypeOfFailure | OtherFailure |
| Priority | normal |
| Resolution | Unresolved |
| Component | Compiler (Type checker) |
| Test case | |
| Differential revisions | |
| BlockedBy | |
| Related | |
| Blocking | |
| CC | ekmett |
| Operating system | |
| Architecture |