[GHC] #11430: ApiAnnotations: work SourceText in for all integer literals

[GHC]

#11430: ApiAnnotations: work SourceText in for all integer literals
-------------------------------------+-------------------------------------
        Reporter:  alanz             |                Owner:  alanz
            Type:  bug               |               Status:  new
        Priority:  normal            |            Milestone:  8.0.1
       Component:  Compiler          |              Version:  8.1
      Resolution:                    |             Keywords:
Operating System:  Unknown/Multiple  |         Architecture:
 Type of failure:  Incorrect API     |  Unknown/Multiple
  annotation                         |            Test Case:
      Blocked By:                    |             Blocking:
 Related Tickets:                    |  Differential Rev(s):
       Wiki Page:                    |
-------------------------------------+-------------------------------------

Comment (by alanz):

 Affected hsSyn elements are

 {{{#!hs
 -- See note [Pragma source text]
 data Activation = NeverActive
                 | AlwaysActive
                 | ActiveBefore SourceText PhaseNum
                      -- Active only *strictly before* this phase
                 | ActiveAfter SourceText PhaseNum
                       -- Active in this phase and later
                 deriving( Eq, Data, Typeable )
                           -- Eq used in comparing rules in HsDecls
 }}}

 {{{#!hs
 data Fixity = Fixity SourceText Int FixityDirection
   -- Note [Pragma source text]
   deriving (Data, Typeable)
 }}}

 and

 {{{#!hs
   | HsTickPragma                      -- A pragma introduced tick
      SourceText                       -- Note [Pragma source text] in
 BasicTypes
      (StringLiteral,(Int,Int),(Int,Int))
                                       -- external span for this tick
      ((SourceText,SourceText),(SourceText,SourceText))
         -- Source text for the four integers used in the span.
         -- See note [Pragma source text] in BasicTypes
      (LHsExpr id)
 }}}

--
Ticket URL: <http://ghc.haskell.org/trac/ghc/ticket/11430#comment:1>
GHC <http://www.haskell.org/ghc/>
The Glasgow Haskell Compiler