[GHC] #10734: pprint of ‘let’ inside ‘do’ prints invalid Haskell

[GHC]

#10734: pprint of ‘let’ inside ‘do’ prints invalid Haskell
-------------------------------------+-------------------------------------
              Reporter:  Fuuzetsu    |             Owner:
                  Type:  bug         |            Status:  new
              Priority:  normal      |         Milestone:
             Component:  Template    |           Version:  7.10.2
  Haskell                            |
              Keywords:              |  Operating System:  Unknown/Multiple
          Architecture:              |   Type of failure:  None/Unknown
  Unknown/Multiple                   |
             Test Case:              |        Blocked By:
              Blocking:              |   Related Tickets:
Differential Revisions:              |
-------------------------------------+-------------------------------------
 On GHC 7.10.1

 {{{#!hs
 Prelude Language.Haskell.TH Language.Haskell.TH.Ppr> pprint <$> runQ [| do
 { let { x = 5 }; return x; } |]
 "do {let x_0 = 5; GHC.Base.return x_0}"
 }}}


 The let binding inside the resulting {{{do}}} should be inside curly
 braces too

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