blob: 58eb3b6c946e2a6fbbf6fcbaa6571a026c1182f3 (
plain)
1
2
3
4
5
6
7
8
9
10
|
{-# LANGUAGE TypeInType, RankNTypes #-}
module T11142 where
import Data.Kind
data SameKind :: k -> k -> *
foo :: forall b. (forall k (a :: k). SameKind a b) -> ()
foo = undefined
|