diff options
Diffstat (limited to 'hadrian/src')
| -rw-r--r-- | hadrian/src/Oracles/Flag.hs | 9 | ||||
| -rw-r--r-- | hadrian/src/Rules/Generate.hs | 1 |
2 files changed, 1 insertions, 9 deletions
diff --git a/hadrian/src/Oracles/Flag.hs b/hadrian/src/Oracles/Flag.hs index 2de81cfdd6..4f88af6432 100644 --- a/hadrian/src/Oracles/Flag.hs +++ b/hadrian/src/Oracles/Flag.hs @@ -2,7 +2,7 @@ module Oracles.Flag ( Flag (..), flag, getFlag, platformSupportsSharedLibs, - ghcWithNativeCodeGen, targetSupportsSMP + targetSupportsSMP ) where import Hadrian.Oracles.TextFile @@ -77,10 +77,3 @@ targetSupportsSMP = do , ver < ARMv7 -> return False | goodArch -> return True | otherwise -> return False - -ghcWithNativeCodeGen :: Action Bool -ghcWithNativeCodeGen = do - goodArch <- anyTargetArch ["i386", "x86_64", "sparc", "powerpc"] - badOs <- anyTargetOs ["ios", "aix"] - ghcUnreg <- flag GhcUnregisterised - return $ goodArch && not badOs && not ghcUnreg diff --git a/hadrian/src/Rules/Generate.hs b/hadrian/src/Rules/Generate.hs index 62a7bbebbc..e2097d8d79 100644 --- a/hadrian/src/Rules/Generate.hs +++ b/hadrian/src/Rules/Generate.hs @@ -315,7 +315,6 @@ generateSettings = do , ("BigNum backend", getBignumBackend) , ("Use interpreter", expr $ yesNo <$> ghcWithInterpreter) - , ("Use native code generator", expr $ yesNo <$> ghcWithNativeCodeGen) , ("Support SMP", expr $ yesNo <$> targetSupportsSMP) , ("RTS ways", unwords . map show <$> getRtsWays) , ("Tables next to code", expr $ yesNo <$> flag TablesNextToCode) |