From 6333d7391068d8029eed3e8eff019b9e2c104c7b Mon Sep 17 00:00:00 2001 From: Sylvain Henry Date: Tue, 7 Jul 2020 13:16:47 +0200 Subject: Put PlatformConstants into Platform --- compiler/GHC/Settings/IO.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'compiler/GHC/Settings/IO.hs') diff --git a/compiler/GHC/Settings/IO.hs b/compiler/GHC/Settings/IO.hs index c84bf280bc..c4e47618d2 100644 --- a/compiler/GHC/Settings/IO.hs +++ b/compiler/GHC/Settings/IO.hs @@ -92,7 +92,7 @@ initSettings top_dir = do cpp_prog <- getToolSetting "Haskell CPP command" cpp_args_str <- getSetting "Haskell CPP flags" - platform <- either pgmError pure $ getTargetPlatform settingsFile mySettings + platform <- either pgmError pure $ getTargetPlatform settingsFile mySettings platformConstants let unreg_cc_args = if platformUnregisterised platform then ["-DNO_REGS", "-DUSE_MINIINTERPRETER"] -- cgit v1.2.1