diff options
| author | Sylvain Henry <sylvain@haskus.fr> | 2020-08-19 11:53:24 +0200 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2020-08-21 09:36:38 -0400 |
| commit | 659eb31b7a40f0aa2ba43c3454b5d9006fde837d (patch) | |
| tree | 3c4cf4092cd6f7b753971c9fce73ca78b8bc3fae /testsuite/tests/hiefile | |
| parent | 50eb4460cd8412387e0c3755a9e0bafaced12bb2 (diff) | |
| download | haskell-659eb31b7a40f0aa2ba43c3454b5d9006fde837d.tar.gz | |
NCG: Dwarf configuration
* remove references to DynFlags in GHC.CmmToAsm.Dwarf
* add specific Dwarf options in NCGConfig instead of directly querying
the debug level
Diffstat (limited to 'testsuite/tests/hiefile')
| -rw-r--r-- | testsuite/tests/hiefile/should_run/HieQueries.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/testsuite/tests/hiefile/should_run/HieQueries.hs b/testsuite/tests/hiefile/should_run/HieQueries.hs index f0b3ee5ba2..2446be5963 100644 --- a/testsuite/tests/hiefile/should_run/HieQueries.hs +++ b/testsuite/tests/hiefile/should_run/HieQueries.hs @@ -14,7 +14,7 @@ import GHC.Iface.Ext.Utils import Data.Maybe (fromJust) import GHC.Driver.Session import GHC.SysTools -import GHC.Utils.Outputable ( Outputable, renderWithStyle, ppr, defaultUserStyle, text) +import GHC.Utils.Outputable ( Outputable, renderWithContext, ppr, defaultUserStyle, text) import qualified Data.Map as M import Data.Foldable @@ -78,5 +78,5 @@ explainEv df hf refmap point = do pretty = unlines . (++["└"]) . ("┌":) . map ("│ "++) . lines - pprint = pretty . renderWithStyle (initSDocContext df sty) . ppr + pprint = pretty . renderWithContext (initSDocContext df sty) . ppr sty = defaultUserStyle |