[GHC] #1143: prettyprint case alternatives get pushed too far to the right

[GHC]

#1143: prettyprint case alternatives get pushed too far to the right
-------------------------------------------+--------------------------------
    Reporter:  ken.takusagawa.2 at gmail.com  |       Owner:         
        Type:  bug                         |      Status:  new    
    Priority:  normal                      |   Milestone:         
   Component:  hslibs/hssource             |     Version:  6.6    
    Severity:  normal                      |    Keywords:         
  Difficulty:  Unknown                     |    Testcase:         
Architecture:  Unknown                     |          Os:  Unknown
-------------------------------------------+--------------------------------
I've been trying to make case statements, or more specifically
 HsGuardedAlts not get pushed way far to the right when the pattern (HsPat)
 is long (wide).  I've had good results with the attached patch.

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