[GHC] #15662: Line pragmas appear to be slightly broken with Clang's CPP

[GHC]

#15662: Line pragmas appear to be slightly broken with Clang's CPP
-------------------------------------+-------------------------------------
           Reporter:  bgamari        |             Owner:  (none)
               Type:  bug            |            Status:  new
           Priority:  normal         |         Milestone:  8.8.1
          Component:  Compiler       |           Version:  8.4.3
           Keywords:                 |  Operating System:  Unknown/Multiple
       Architecture:                 |   Type of failure:  None/Unknown
  Unknown/Multiple                   |
          Test Case:                 |        Blocked By:
           Blocking:                 |   Related Tickets:
Differential Rev(s):                 |         Wiki Page:
-------------------------------------+-------------------------------------
 Two tests fail on OS X due to CPP irregularities,
 {{{
 7       --- /var/folders/3y/qjvrbynj45j_z4jt_l1k1qg00000gv/T/ghctest-
 jb4vg3rr/test
 spaces/parser/should_fail/readFail032.run/readFail032.stderr.normalised
 2018-09-18 09:07:49.000000000 +0300
 8       +++ /var/folders/3y/qjvrbynj45j_z4jt_l1k1qg00000gv/T/ghctest-
 jb4vg3rr/test
 spaces/parser/should_fail/readFail032.run/readFail032.comp.stderr.normalised
 2018-09-18 09:07:49.000000000 +0300
 9       @@ -1,5 +1,5 @@
 10
 11      -readFail032.hs:25:38:
 12      +readFail032.hs:26:38:
 13            Couldn't match type ‘Char’ with ‘[Char]’
 14             Expected type: [[Char]]
 15               Actual type: [Char]
 16      --- /var/folders/3y/qjvrbynj45j_z4jt_l1k1qg00000gv/T/ghctest-
 jb4vg3rr/test
 spaces/parser/should_fail/readFail048.run/readFail048.stderr.normalised
 2018-09-18 09:07:50.000000000 +0300
 17      +++ /var/folders/3y/qjvrbynj45j_z4jt_l1k1qg00000gv/T/ghctest-
 jb4vg3rr/test
 spaces/parser/should_fail/readFail048.run/readFail048.comp.stderr.normalised
 2018-09-18 09:07:50.000000000 +0300
 18      @@ -1,5 +1,5 @@
 19
 20      -readFail048.hs:25:38:
 21      +readFail048.hs:26:38:
 22            Couldn't match type ‘Char’ with ‘[Char]’
 23             Expected type: [[Char]]
 24               Actual type: [Char]
 }}}

 This appears to be a CPP bug.

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