Parse error on quasi quotes

[NeilMitchell]

Prelude Language.Haskell.Exts.Annotated> fmap (const ()) $ fromParseResult $ par
seFileContents "{-# LANGUAGE QuasiQuotes #-}\nfoo = [$q| a b]"
*** Exception: fromParseResult: Parse failed at [<unknown>.hs] (2:7): Unexpected
 end of input while lexing quasi-quoter

Reported by an HLint user as: http://code.google.com/p/ndmitchell/issues/detail?id=424

[NeilMitchell]

Note also http://code.google.com/p/ndmitchell/issues/detail?id=473, which also has a problem in the QuasiQuotes?. The code there is:

{-# LANGUAGE QuasiQuotes #-}
a = [aesonQQ|{"type": "buy", "obj_type": "catapult","x": 10.0, "y": 11.0 } |] 

Giving:

Parse error: {