1 2 3 4 5 6 7 8
{-# LANGUAGE TemplateHaskell #-} module T5290 where import Language.Haskell.TH $( let n = mkName "T" in return [DataD [] n [] [NormalC n [(Unpacked,ConT ''Int)]] []] )