1 2 3 4 5
{-# language UnboxedTuples #-} module T14811 where data Foo a = Foo (# a #) data Bar = Bar (# #)