1 2 3 4 5 6 7 8
{-# LANGUAGE PolyKinds, DataKinds #-} module T5798 where data Proxy t = ProxyC test :: Proxy '[Int, Bool] test = ProxyC