Applicative instance for template haskell's Q