template for -package ghc.
This commit is contained in:
parent
e94cc84c43
commit
5e21c71b1e
7
Check.hs
7
Check.hs
@ -76,6 +76,13 @@ setImportPath d = d {
|
||||
importPaths = importPaths d ++ ["..","../..","../../..","../../../../.."]
|
||||
}
|
||||
|
||||
{-
|
||||
setGhcPackage :: DynFlags -> DynFlags
|
||||
setGhcPackage d = d {
|
||||
packageFlags = ExposePackage "ghc" : packageFlags d
|
||||
}
|
||||
-}
|
||||
|
||||
----------------------------------------------------------------
|
||||
|
||||
showErrMsg :: ErrMsg -> String
|
||||
|
Loading…
Reference in New Issue
Block a user