:: TYPE ('BoxedRep l) where
T :: B
F :: B
data Foo = Foo (B @'Unlifted)
fooT :: Foo
fooT = Foo T
дает
• Couldn't match a lifted type with an unlifted type
Expected: B @'Unlifted
Actual: B @'Lifted
data B :: forall l. TYPE ('BoxedRep l) where T :: B @l
Обсуждают сегодня