summaryrefslogtreecommitdiff
path: root/testsuite/tests/regalloc/regalloc_unit_tests.hs
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/regalloc/regalloc_unit_tests.hs')
-rw-r--r--testsuite/tests/regalloc/regalloc_unit_tests.hs3
1 files changed, 1 insertions, 2 deletions
diff --git a/testsuite/tests/regalloc/regalloc_unit_tests.hs b/testsuite/tests/regalloc/regalloc_unit_tests.hs
index 05ce9147d9..d8176cd644 100644
--- a/testsuite/tests/regalloc/regalloc_unit_tests.hs
+++ b/testsuite/tests/regalloc/regalloc_unit_tests.hs
@@ -28,7 +28,6 @@ import GHC.Driver.Main
import GHC.StgToCmm.CgUtils
import GHC.CmmToAsm
import GHC.CmmToAsm.Config
-import GHC.CmmToAsm.Monad as NCGConfig
import GHC.Cmm.Info.Build
import GHC.Cmm.Pipeline
import GHC.Cmm.Parser
@@ -106,7 +105,7 @@ compileCmmForRegAllocStats ::
IO [( Maybe [Color.RegAllocStats (Alignment, RawCmmStatics) X86.Instr.Instr]
, Maybe [Linear.RegAllocStats])]
compileCmmForRegAllocStats dflags' cmmFile ncgImplF us = do
- let ncgImpl = ncgImplF (NCGConfig.initConfig dflags)
+ let ncgImpl = ncgImplF (initNCGConfig dflags)
hscEnv <- newHscEnv dflags
-- parse the cmm file and output any warnings or errors