diff options
| author | Andreas Klebinger <klebinger.andreas@gmx.at> | 2020-02-06 19:04:35 +0100 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2020-02-09 02:55:46 -0500 |
| commit | b2e18e26c34424ab814453a73404429cdf1a4d4a (patch) | |
| tree | f25f162089491464cf8cfc28bfa87b09899fed3d /compiler/GHC | |
| parent | 82f9be8c6aafb70f612e72bef517c76437726c78 (diff) | |
| download | haskell-b2e18e26c34424ab814453a73404429cdf1a4d4a.tar.gz | |
Fix -ddump-stg-final.
Once again make sure this dumps the STG used for codegen.
Diffstat (limited to 'compiler/GHC')
| -rw-r--r-- | compiler/GHC/Stg/Pipeline.hs | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/compiler/GHC/Stg/Pipeline.hs b/compiler/GHC/Stg/Pipeline.hs index de426adad7..4b6a36536f 100644 --- a/compiler/GHC/Stg/Pipeline.hs +++ b/compiler/GHC/Stg/Pipeline.hs @@ -66,8 +66,6 @@ stg2stg dflags this_mod binds -- preserve the order or only create minimal recursive groups, so a -- sorting pass is necessary. ; let binds_sorted = depSortStgPgm this_mod binds' - ; dump_when Opt_D_dump_stg_final "Final STG:" binds_sorted - ; return binds_sorted } |