Template Haskell: Quoting single letter identifier leads to a parse error at end of input.

To reproduce the bug with ghci:

Prelude> :set -XTemplateHaskell
Prelude> let a = 1
Prelude> :t 'a

<interactive>:1:1:
    lexical error in string/character literal at character 'a'

As a module, the following source code works if the last line has no newline:

{-# LANGUAGE TemplateHaskell #-}
a = 1
b = 'a

Trac metadata

Trac field	Value
Version	6.10.1
Type	Bug
TypeOfFailure	OtherFailure
Priority	normal
Resolution	Unresolved
Component	Compiler
Test case
Differential revisions
BlockedBy
Related
Blocking
CC
Operating system
Architecture