Parse error on valid Template Haskell code

[Inflation]

let pcons x xs = [p| $x : $xs |]

would fail like

hindent: <interactive>:43:3: Parse error in pattern: $x

Adding parentheses won't help either.

[Hiroki Tokunaga]

Closing as the current master no longer has this bug.