diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2012-07-19 10:03:06 +0100 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2012-07-30 11:55:17 +0100 |
| commit | f1ed6a1052331b6d5b001983925bdab66f99b0f6 (patch) | |
| tree | d7c494a8e9bff22a5d91ca7765792a9ce13dac4a /compiler/cmm/PprCmm.hs | |
| parent | fe3753e75f2f140c6c2554e3e255d8f4c6f254be (diff) | |
| download | haskell-f1ed6a1052331b6d5b001983925bdab66f99b0f6.tar.gz | |
New codegen: do not split proc-points when using the NCG
Proc-point splitting is only required by backends that do not support
having proc-points within a code block (that is, everything except the
native backend, i.e. LLVM and C).
Not doing proc-point splitting saves some compilation time, and might
produce slightly better code in some cases.
Diffstat (limited to 'compiler/cmm/PprCmm.hs')
| -rw-r--r-- | compiler/cmm/PprCmm.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/cmm/PprCmm.hs b/compiler/cmm/PprCmm.hs index 132f291540..58866979f8 100644 --- a/compiler/cmm/PprCmm.hs +++ b/compiler/cmm/PprCmm.hs @@ -100,7 +100,7 @@ pprStackInfo (StackInfo {arg_space=arg_space, updfr_space=updfr_space}) = ptext (sLit "updfr_space: ") <> ppr updfr_space pprTopInfo :: CmmTopInfo -> SDoc -pprTopInfo (TopInfo {info_tbl=info_tbl, stack_info=stack_info}) = +pprTopInfo (TopInfo {info_tbls=info_tbl, stack_info=stack_info}) = vcat [ptext (sLit "info_tbl: ") <> ppr info_tbl, ptext (sLit "stack_info: ") <> ppr stack_info] |