diff options
| author | John Ericson <John.Ericson@Obsidian.Systems> | 2022-05-15 14:09:46 +0000 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-05-23 17:33:59 -0400 |
| commit | 1a4195b04866ebdb5f42006fb92b8a73a4aa2bac (patch) | |
| tree | 4bf074e5486b2757ed7620920dadcc35b59c336b /compiler/GHC/Driver/Config | |
| parent | bc723ac2cf2cfc329de4b8523bf891965075879b (diff) | |
| download | haskell-1a4195b04866ebdb5f42006fb92b8a73a4aa2bac.tar.gz | |
Make debug a `Bool` not an `Int` in `StgToCmmConfig`
We don't need any more resolution than this.
Rename the field to `stgToCmmEmitDebugInfo` to indicate it is no longer
conveying any "level" information.
Diffstat (limited to 'compiler/GHC/Driver/Config')
| -rw-r--r-- | compiler/GHC/Driver/Config/StgToCmm.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Driver/Config/StgToCmm.hs b/compiler/GHC/Driver/Config/StgToCmm.hs index b0b28bf158..38e8f6684d 100644 --- a/compiler/GHC/Driver/Config/StgToCmm.hs +++ b/compiler/GHC/Driver/Config/StgToCmm.hs @@ -22,7 +22,7 @@ initStgToCmmConfig dflags mod = StgToCmmConfig , stgToCmmThisModule = mod , stgToCmmTmpDir = tmpDir dflags , stgToCmmContext = initSDocContext dflags defaultDumpStyle - , stgToCmmDebugLevel = debugLevel dflags + , stgToCmmEmitDebugInfo = debugLevel dflags > 0 , stgToCmmBinBlobThresh = b_blob , stgToCmmMaxInlAllocSize = maxInlineAllocSize dflags -- ticky options |