1 2 3 4 5 6 7
{-# LANGUAGE PolyKinds, UnliftedNewtypes, NoFieldSelectors #-} module T20113 where import GHC.Exts newtype Y (a :: TYPE rep) = MkY { y_fld :: a }