1 2 3 4 5 6 7
{-# LANGUAGE PolyKinds #-} module T11724 where import GHC.Exts data Foo (r :: RuntimeRep) (a :: TYPE r) = Foo a