diff options
Diffstat (limited to 'testsuite/tests/polykinds/T16244.hs')
-rw-r--r-- | testsuite/tests/polykinds/T16244.hs | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/testsuite/tests/polykinds/T16244.hs b/testsuite/tests/polykinds/T16244.hs new file mode 100644 index 0000000000..dbcb5232b4 --- /dev/null +++ b/testsuite/tests/polykinds/T16244.hs @@ -0,0 +1,11 @@ +{-# LANGUAGE ConstraintKinds #-} +{-# LANGUAGE DataKinds #-} +{-# LANGUAGE MultiParamTypeClasses #-} +{-# LANGUAGE PolyKinds #-} +module T16244 where + +import Data.Kind + +type Const a b = a +type SameKind (a :: k) (b :: k) = (() :: Constraint) +class SameKind a b => C (k :: Const Type a) (b :: k) |