ghc-exactprint-0.5.3.1: tests/examples/ghc80/BadTelescope.hs

{-# LANGUAGE TypeInType #-}

module BadTelescope where

import Data.Kind

data SameKind :: k -> k -> *

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