Wolfgang Jeltsch pushed to branch wip/jeltsch/textual-bytecode-output at Glasgow Haskell Compiler / GHC
Commits:
-
17901d77
by Wolfgang Jeltsch at 2026-07-02T13:33:39+03:00
1 changed file:
Changes:
| ... | ... | @@ -252,15 +252,10 @@ pprDataConstructorInfoTable :: Name -> ConInfoTable -> SDoc |
| 252 | 252 | pprDataConstructorInfoTable dataConstrName ConInfoTable {..}
|
| 253 | 253 | = entry (text "info table of" <+> ppr dataConstrName <> text ":") $
|
| 254 | 254 | vcat [
|
| 255 | - pprTablePositioning $ conItblTablesNextToCode,
|
|
| 256 | 255 | pprPointerWordCount $ conItblPtrs,
|
| 257 | 256 | pprNonPointerWordCount $ conItblNPtrs
|
| 258 | 257 | ]
|
| 259 | 258 | |
| 260 | --- | […]
|
|
| 261 | -pprTablePositioning :: Bool -> SDoc
|
|
| 262 | -pprTablePositioning = entry (text "tables next to code:") . noOrYes
|
|
| 263 | - |
|
| 264 | 259 | -- | […]
|
| 265 | 260 | pprPointerWordCount :: Int -> SDoc
|
| 266 | 261 | pprPointerWordCount = entry (text "number of words for pointers:") . ppr
|