Wolfgang Jeltsch pushed to branch wip/jeltsch/textual-bytecode-output at Glasgow Haskell Compiler / GHC

Commits:

1 changed file:

Changes:

  • compiler/GHC/ByteCode/Show.hs
    ... ... @@ -222,7 +222,9 @@ pprInternalBreakpointID
    222 222
       -> SDoc                 -- ^ The textual information
    
    223 223
     pprInternalBreakpointID current_module InternalBreakpointId {..}
    
    224 224
       | ibi_info_mod == current_module = indexDoc
    
    225
    -  | otherwise                      = indexDoc <+> text "in" <+> ppr ibi_info_mod
    
    225
    +  | otherwise                      = indexDoc                  <+>
    
    226
    +                                     text "in"                 <+>
    
    227
    +                                     quotes (ppr ibi_info_mod)
    
    226 228
       where
    
    227 229
     
    
    228 230
       indexDoc :: SDoc