Commit ae35b2b2 authored by Andrey Mokhov's avatar Andrey Mokhov
Browse files

Remove dead code

parent 0106f203
......@@ -12,8 +12,7 @@ module Packages (
-- * Package information
programName, nonHsMainPackage, autogenPath, programPath, timeoutPath,
buildDll0, rtsContext, rtsBuildPath, libffiContext, libffiBuildPath,
libffiLibraryName
rtsContext, rtsBuildPath, libffiContext, libffiBuildPath, libffiLibraryName
) where
import Hadrian.Package
......@@ -178,11 +177,6 @@ autogenPath context@Context {..}
where
autogen dir = contextPath context <&> (-/- dir -/- "autogen")
buildDll0 :: Context -> Action Bool
buildDll0 Context {..} = do
windows <- windowsHost
return $ windows && stage == Stage1 && package == compiler
-- | RTS is considered a Stage1 package.
rtsContext :: Context
rtsContext = vanillaContext Stage1 rts
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment