Embrace -XTypeInType, add -XStarIsType
[ghc.git] / testsuite / tests / dependent / should_fail / BadTelescope3.hs
1 {-# LANGUAGE PolyKinds, ExplicitForAll #-}
2
3 module BadTelescope3 where
4
5 import Data.Kind
6
7 data SameKind :: k -> k -> *
8
9 type S a k (b :: k) = SameKind a b