1 2 3 4 5 6 7 8 9
module A where import Language.Haskell.TH import F kaas :: Exp kaas = LitE (StringL "kaas")