T5290.hs:1:1: Splicing declarations
    let n = mkName "T"
    in return [DataD [] n [] [NormalC n [(Unpacked, ConT 'Int)]] []]
  ======>
    T5290.hs:(7,4)-(8,67)
    data T = T {-# UNPACK #-} !Int