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
    ... ... @@ -364,7 +364,7 @@ pprType = entry (text "type") . ppr
    364 364
     -- | […]
    
    365 365
     pprTypeVariables :: [IfaceTvBndr] -> SDoc
    
    366 366
     pprTypeVariables = entry (text "type variables") .
    
    367
    -                   vcat                          .
    
    367
    +                   vcatOrNone                    .
    
    368 368
                        map pprTypeVariableBinder
    
    369 369
     
    
    370 370
     -- | […]
    
    ... ... @@ -373,7 +373,7 @@ pprTypeVariableBinder (name, kind) = ppr name <+> text "::" <+> ppr kind
    373 373
     
    
    374 374
     -- | […]
    
    375 375
     pprVariables :: [Maybe (IfaceIdBndr, Word)] -> SDoc
    
    376
    -pprVariables = entry (text "variables") . vcat . map pprVariable
    
    376
    +pprVariables = entry (text "variables") . vcatOrNone . map pprVariable
    
    377 377
     
    
    378 378
     -- | […]
    
    379 379
     pprVariable :: Maybe (IfaceIdBndr, Word) -> SDoc