Wolfgang Jeltsch pushed to branch wip/jeltsch/textual-bytecode-output at Glasgow Haskell Compiler / GHC Commits: 156fef80 by Wolfgang Jeltsch at 2026-07-01T21:12:57+03:00 Make module name output as an ordinary field - - - - - 1 changed file: - compiler/GHC/ByteCode/Show.hs Changes: ===================================== compiler/GHC/ByteCode/Show.hs ===================================== @@ -91,13 +91,17 @@ showByteCode logger env path = do -- | […] pprOnDiskModuleByteCode :: OnDiskModuleByteCode -> SDoc pprOnDiskModuleByteCode OnDiskModuleByteCode {..} - = entry (text "module" <+> ppr odgbc_module) $ - vcat [ + = vcat [ + pprModuleIdent $ odgbc_module, pprOnDiskModuleByteCodeHash $ odgbc_hash, pprCompiledByteCode odgbc_module $ odgbc_compiled_byte_code, pprObjectFileContents $ odgbc_foreign ] +-- | […] +pprModuleIdent :: Module -> SDoc +pprModuleIdent = entry (text "name:") . ppr + -- | […] pprOnDiskModuleByteCodeHash :: Fingerprint -> SDoc pprOnDiskModuleByteCodeHash = entry (text "hash:") . ppr View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/156fef80b7bd4ac428f7dd525cad7644... -- View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/156fef80b7bd4ac428f7dd525cad7644... You're receiving this email because of your account on gitlab.haskell.org.