Levity polymorphism check eliminates non-levity-polymorphic data constructor
When I say
data X where
MkX :: forall (a :: TYPE r). (a -> a) -> X
I get
• A representation-polymorphic type is not allowed here:
Type: a
Kind: TYPE r
• In the definition of data constructor ‘MkX’
In the data type declaration for ‘X’
But that's silly, because the type is not levity-polymorphic!
Trac metadata
Trac field | Value |
---|---|
Version | 8.0.1 |
Type | Bug |
TypeOfFailure | OtherFailure |
Priority | normal |
Resolution | Unresolved |
Component | Compiler |
Test case | |
Differential revisions | |
BlockedBy | |
Related | |
Blocking | |
CC | |
Operating system | |
Architecture |