1 2 3 4 5 6 7 8
{-# LANGUAGE TemplateHaskell #-} module Main where import Language.Haskell.TH main = do {d <- runQ $ [| let { foo = bar where bar = 3 } in foo |]; print d}