maybe fix build for lts-16.13

This commit is contained in:
Jon Doe
2020-09-13 14:53:32 +02:00
committed by Maciej Bonin
parent 5e2355eadd
commit c59e1df710
4 changed files with 9 additions and 9 deletions

View File

@ -491,8 +491,8 @@ lookupPkg' p = withPkgEnvs env $ \fms -> go fms p
#endif
-- If we're loading dynamic libs we need the cbits to appear before the
-- real packages.
settings <- initSysTools (Just libdir)
llvmConfig <- initLlvmConfig (Just libdir)
settings <- initSysTools (libdir)
llvmConfig <- initLlvmConfig (libdir)
dflags <- initDynFlags $ defaultDynFlags settings llvmConfig
libs <- mapM (findHSlib
#if MIN_VERSION_ghc(7,8,0)

View File

@ -126,8 +126,8 @@ readBinIface' :: FilePath -> IO ModIface
readBinIface' hi_path = do
-- kludgy as hell
#if MIN_VERSION_ghc(7,2,0)
mySettings <- initSysTools (Just libdir) -- how should we really set the top dir?
llvmConfig <- initLlvmConfig (Just libdir)
mySettings <- initSysTools (libdir) -- how should we really set the top dir?
llvmConfig <- initLlvmConfig (libdir)
dflags <- initDynFlags (defaultDynFlags mySettings llvmConfig)
e <- newHscEnv dflags
#else