[commit: ghc] wip/nfs-locking: Rename includeHcArgs to includeGhcArgs. (734994c)
git at git.haskell.org
git at git.haskell.org
Thu Oct 26 23:24:52 UTC 2017
Repository : ssh://git@git.haskell.org/ghc
On branch : wip/nfs-locking
Link : http://ghc.haskell.org/trac/ghc/changeset/734994cf18ee377472128ceab7ad6ef1f8773684/ghc
>---------------------------------------------------------------
commit 734994cf18ee377472128ceab7ad6ef1f8773684
Author: Andrey Mokhov <andrey.mokhov at gmail.com>
Date: Sat Jan 17 23:31:52 2015 +0000
Rename includeHcArgs to includeGhcArgs.
>---------------------------------------------------------------
734994cf18ee377472128ceab7ad6ef1f8773684
src/Package/Base.hs | 6 +++---
src/Package/Compile.hs | 2 +-
src/Package/Dependencies.hs | 6 +-----
3 files changed, 5 insertions(+), 9 deletions(-)
diff --git a/src/Package/Base.hs b/src/Package/Base.hs
index 0b053e8..9d75e04 100644
--- a/src/Package/Base.hs
+++ b/src/Package/Base.hs
@@ -7,7 +7,7 @@ module Package.Base (
Package (..), Settings (..), TodoItem (..),
defaultSettings, libraryPackage,
commonCcArgs, commonLdArgs, commonCppArgs, commonCcWarninigArgs,
- pathArgs, packageArgs, includeHcArgs, pkgHsSources,
+ pathArgs, packageArgs, includeGhcArgs, pkgHsSources,
pkgDepHsObjects, pkgLibHsObjects, pkgCObjects,
argSizeLimit,
sourceDependecies,
@@ -92,8 +92,8 @@ packageArgs stage pathDist = do
else productArgs "-package-name" (arg $ PackageKey pathDist)
<> productArgs "-package" (args $ Deps pathDist) ]
-includeHcArgs :: FilePath -> FilePath -> Args
-includeHcArgs path dist =
+includeGhcArgs :: FilePath -> FilePath -> Args
+includeGhcArgs path dist =
let pathDist = path </> dist
buildDir = toStandard $ pathDist </> "build"
in args [ arg "-i"
diff --git a/src/Package/Compile.hs b/src/Package/Compile.hs
index 0c25ae8..8052356 100644
--- a/src/Package/Compile.hs
+++ b/src/Package/Compile.hs
@@ -18,7 +18,7 @@ ghcArgs (Package _ path _) (stage, dist, _) way srcs result =
, wayHcArgs way
, args SrcHcArgs
, packageArgs stage pathDist
- , includeHcArgs path dist
+ , includeGhcArgs path dist
, concatArgs ["-optP"] $ CppArgs pathDist
, args $ HsArgs pathDist
-- TODO: now we have both -O and -O2
diff --git a/src/Package/Dependencies.hs b/src/Package/Dependencies.hs
index 7378f20..7301051 100644
--- a/src/Package/Dependencies.hs
+++ b/src/Package/Dependencies.hs
@@ -13,7 +13,7 @@ ghcArgs (Package name path _) (stage, dist, settings) =
depFile = buildDir </> "haskell.deps"
in args [ arg "-M"
, packageArgs stage pathDist
- , includeHcArgs path dist
+ , includeGhcArgs path dist
, concatArgs ["-optP"] $ CppArgs pathDist
, productArgs ["-odir", "-stubdir", "-hidir"] buildDir
, args ["-dep-makefile", depFile <.> "new"]
@@ -21,10 +21,6 @@ ghcArgs (Package name path _) (stage, dist, settings) =
, args $ HsArgs pathDist
, args $ pkgHsSources path dist ]
--- $(CPP) $($1_$2_MKDEPENDC_OPTS)
--- $($1_$2_$(firstword $($1_$2_WAYS))_ALL_CC_OPTS)
--- $($(basename $4)_CC_OPTS) -MM -x c $4 -MF $3.bit
---
-- $1_$2_$3_ALL_CC_OPTS = \
-- $$(WAY_$3_CC_OPTS) \
-- $$($1_$2_DIST_GCC_CC_OPTS) \
More information about the ghc-commits
mailing list