Re: [GHC] #10707: -fth-dec-file outputs invalid case clauses

29 Jul 2015


      #10707: -fth-dec-file outputs invalid case clauses
-------------------------------------+-------------------------------------
        Reporter:  Fabian            |                   Owner:
            Type:  bug               |                  Status:  new
        Priority:  normal            |               Milestone:
       Component:  Compiler          |                 Version:  7.10.1
      Resolution:                    |                Keywords:
Operating System:  Unknown/Multiple  |            Architecture:
                                     |  Unknown/Multiple
 Type of failure:  Other             |               Test Case:
      Blocked By:                    |                Blocking:
 Related Tickets:  #10701            |  Differential Revisions:
-------------------------------------+-------------------------------------
Description changed by Fabian:

Old description:
...
instance Data.Aeson.Types.Class.ToJSON Language.Haskell.TH.Syntax.Name
where
  Data.Aeson.Types.Class.toJSON x
    = \ k_a94l v_a94m
        -> case k_a94l of {
             GHC.Base.Just "" -> GHC.Err.undefined
             GHC.Base.Nothing -> GHC.Err.undefined }
        (GHC.Base.Just "test") "test2"
New description:

 {{{#!hs
 instance Data.Aeson.Types.Class.ToJSON Language.Haskell.TH.Syntax.Name
 where
   Data.Aeson.Types.Class.toJSON x
     = \ k_a94l v_a94m
         -> case k_a94l of {
              GHC.Base.Just "" -> GHC.Err.undefined
              GHC.Base.Nothing -> GHC.Err.undefined }
         (GHC.Base.Just "test") "test2"
 }}}

--

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