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

Filter rts extra_libraries from lookupPkg - they're already linked.

Browse Source
This commit is contained in:
Don Stewart 2005-05-21 05:33:58 +00:00
parent 24113b6beb
commit f488031d81
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/plugins/System/Plugins/Env.hs
View File

@ -361,7 +361,6 @@ mkSOName root = root
mkSOName root = "lib" ++ root ++ ".so" mkSOName root = "lib" ++ root ++ ".so"
#endif #endif
-- --
-- return any stuff to load for this package, plus the list of packages -- return any stuff to load for this package, plus the list of packages
-- this package depends on. which includes stuff we have to then load -- this package depends on. which includes stuff we have to then load
@ -378,7 +377,7 @@ lookupPkg' p = withPkgEnvs env $ \fms -> go fms p
let hslibs = hsLibraries package let hslibs = hsLibraries package
extras' = extraLibraries package extras' = extraLibraries package
cbits = filter (\e -> reverse (take (length "_cbits") (reverse e)) == "_cbits") extras' cbits = filter (\e -> reverse (take (length "_cbits") (reverse e)) == "_cbits") extras'
extras = filter (not . flip elem cbits) extras' extras = filter (not . flip elem (cbits++["m","gmp"])) extras'
ldopts = ldOptions package ldopts = ldOptions package
deppkgs = packageDeps package deppkgs = packageDeps package
ldInput <- mapM classifyLdInput ldopts ldInput <- mapM classifyLdInput ldopts