path: root/testsuite/tests/unboxedsums/sum_rr.hs

{-# LANGUAGE DataKinds, KindSignatures #-}

module Example where

import Data.Typeable
import GHC.Exts

data Wat (a :: TYPE 'UnboxedSumRep) = Wat a