{-# OPTIONS -fglasgow-exts -fth #-}
module Foo where
import Language.Haskell.TH


expFoo :: Q Exp
expFoo = let foo = "foo" in return (VarE 'foo)