[commit: ghc] wip/nfs-locking: Pass GMP objects to Ld explicitly (aaead2a)

git at git.haskell.org git at git.haskell.org
Fri Oct 27 00:15:19 UTC 2017


Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/nfs-locking
Link       : http://ghc.haskell.org/trac/ghc/changeset/aaead2a5caa9fa96cc8a9f8a2762582bec70126f/ghc

>---------------------------------------------------------------

commit aaead2a5caa9fa96cc8a9f8a2762582bec70126f
Author: Andrey Mokhov <andrey.mokhov at gmail.com>
Date:   Fri May 20 00:23:50 2016 +0100

    Pass GMP objects to Ld explicitly
    
    See #241.


>---------------------------------------------------------------

aaead2a5caa9fa96cc8a9f8a2762582bec70126f
 src/Rules/Library.hs | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/src/Rules/Library.hs b/src/Rules/Library.hs
index a198c64..2e59755 100644
--- a/src/Rules/Library.hs
+++ b/src/Rules/Library.hs
@@ -67,13 +67,12 @@ buildPackageGhciLibrary context at Context {..} = priority 2 $ do
             cSrcs <- cSources context
             hSrcs <- hSources context
 
+            eObjs <- extraObjects context
             let cObjs = map (objFile context) cSrcs
                 hObjs = [ path -/- src <.> osuf way | src <- hSrcs ]
-                gObjs = [ gmpObjects -/- "*.o" | package == integerGmp ]
-                objs  = cObjs ++ hObjs
-            when (package == integerGmp) $ orderOnly [gmpLibraryH]
+                objs  = cObjs ++ hObjs ++ eObjs
             need objs
-            build $ Target context Ld (objs ++ gObjs) [obj]
+            build $ Target context Ld objs [obj]
 
 -- TODO: Get rid of code duplication and simplify. See also src2dep.
 -- Given a 'Context' and a 'FilePath' to a source file, compute the 'FilePath'



More information about the ghc-commits mailing list