ghc-exactprint-0.5.1.0: tests/examples/ghc8/BadTelescope.hs

{-# LANGUAGE TypeInType #-}

module BadTelescope where

import Data.Kind

data SameKind :: k -> k -> *

data X a k (b :: k) (c :: SameKind a b)