wrath/shaniqua-plugins
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Get this to compile.

Browse Source
This commit is contained in:
Galen Huntington
2019-03-15 21:10:40 -07:00
parent 0f9def059a
commit f569b82460
5 changed files with 12 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
src/System/Plugins/Load.hs
View File

@ -61,7 +61,7 @@ module System.Plugins.Load (
) where
#include "../../../config.h"
#include "config.h"
import System.Plugins.Make ( build )
import System.Plugins.Env
@ -104,7 +104,7 @@ import GHC ( defaultCallbacks )
#else
import DynFlags (defaultDynFlags, initDynFlags)
import GHC.Paths (libdir)
import SysTools (initSysTools)
import SysTools (initSysTools, initLlvmConfig)
#endif
import GHC.Ptr ( Ptr(..), nullPtr )
#if !MIN_VERSION_ghc(7,4,1)
@ -127,7 +127,8 @@ 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?
dflags <- initDynFlags (defaultDynFlags mySettings)
llvmConfig <- initLlvmConfig (Just libdir)
dflags <- initDynFlags (defaultDynFlags mySettings llvmConfig)
e <- newHscEnv dflags
#else
e <- newHscEnv defaultCallbacks undefined