path: root/testsuite/tests/polykinds/T11203.hs

{-# LANGUAGE PolyKinds, KindSignatures #-}

module T11203 where

data SameKind :: k -> k -> *

data Q (a :: k1) (b :: k2) c = MkQ (SameKind a b)