Worked around a GHC bug on TH name shadowing

http://ghc.haskell.org/trac/ghc/ticket/7092