[commit: ghc] wip/nfs-locking: simplify configureIntGmpArguments based on idea provided by Gabor Greif (86a3fe5)
git at git.haskell.org
git at git.haskell.org
Thu Oct 26 23:51:43 UTC 2017
Repository : ssh://git@git.haskell.org/ghc
On branch : wip/nfs-locking
Link : http://ghc.haskell.org/trac/ghc/changeset/86a3fe5f1e16ef919cf0145c0830f2ad7cd8586e/ghc
>---------------------------------------------------------------
commit 86a3fe5f1e16ef919cf0145c0830f2ad7cd8586e
Author: Karel Gardas <karel.gardas at centrum.cz>
Date: Wed Jan 13 23:31:29 2016 +0100
simplify configureIntGmpArguments based on idea provided by Gabor Greif
>---------------------------------------------------------------
86a3fe5f1e16ef919cf0145c0830f2ad7cd8586e
src/Rules/Gmp.hs | 11 +++--------
1 file changed, 3 insertions(+), 8 deletions(-)
diff --git a/src/Rules/Gmp.hs b/src/Rules/Gmp.hs
index f34f3f0..f6d6fe8 100644
--- a/src/Rules/Gmp.hs
+++ b/src/Rules/Gmp.hs
@@ -61,14 +61,9 @@ configureIntGmpArguments :: Action [String]
configureIntGmpArguments = do
includes <- settingList GmpIncludeDirs
libs <- settingList GmpLibDirs
- return ([]
- ++ (if (not (null includes))
- then map ((++) "--with-gmp-includes=") includes
- else [])
- ++ (if (not (null libs))
- then map ((++) "--with-gmp-libraries=") libs
- else [])
- )
+ return $ map ("--with-gmp-includes=" ++) includes
+ ++ map ("--with-gmp-libraries=" ++) libs
+
-- TODO: we rebuild gmp every time.
gmpRules :: Rules ()
More information about the ghc-commits
mailing list