1 2 3 4 5 6 7 8
{-# LANGUAGE TemplateHaskell #-} module TH where import Language.Haskell.TH decl :: Q [Dec] decl = [d| f x = x|]