diff options
Diffstat (limited to 'hadrian/src/Rules/Generate.hs')
-rw-r--r-- | hadrian/src/Rules/Generate.hs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/hadrian/src/Rules/Generate.hs b/hadrian/src/Rules/Generate.hs index b167cd1a00..0c35e85dd7 100644 --- a/hadrian/src/Rules/Generate.hs +++ b/hadrian/src/Rules/Generate.hs @@ -290,6 +290,7 @@ generateSettings = do , ("dllwrap command", settingsFileSetting SettingsFileSetting_DllWrapCommand) , ("windres command", settingsFileSetting SettingsFileSetting_WindresCommand) , ("libtool command", settingsFileSetting SettingsFileSetting_LibtoolCommand) + , ("unlit command", ("$topdir/bin/" <>) . takeFileName <$> builderPath Unlit) , ("cross compiling", flag' CrossCompiling) , ("target os", lookupValueOrError configFile "haskell-target-os") , ("target arch", lookupValueOrError configFile "haskell-target-arch") @@ -335,7 +336,6 @@ generateConfigHs = do cGhcWithSMP <- expr $ yesNo <$> ghcWithSMP cGhcEnableTablesNextToCode <- expr $ yesNo <$> ghcEnableTablesNextToCode cLeadingUnderscore <- expr $ yesNo <$> flag LeadingUnderscore - cGHC_UNLIT_PGM <- fmap takeFileName $ getBuilderPath Unlit cLibFFI <- expr useLibFFIForAdjustors rtsWays <- getRtsWays cGhcRtsWithLibdw <- getFlag WithLibdw @@ -393,8 +393,6 @@ generateConfigHs = do , "cGhcEnableTablesNextToCode = " ++ show cGhcEnableTablesNextToCode , "cLeadingUnderscore :: String" , "cLeadingUnderscore = " ++ show cLeadingUnderscore - , "cGHC_UNLIT_PGM :: String" - , "cGHC_UNLIT_PGM = " ++ show cGHC_UNLIT_PGM , "cLibFFI :: Bool" , "cLibFFI = " ++ show cLibFFI , "cGhcThreaded :: Bool" |