[commit: ghc] wip/nfs-locking: Rename getHsSources to getPackageSources. (810b1e2)
git at git.haskell.org
git at git.haskell.org
Thu Oct 26 23:17:29 UTC 2017
Repository : ssh://git@git.haskell.org/ghc
On branch : wip/nfs-locking
Link : http://ghc.haskell.org/trac/ghc/changeset/810b1e224cc0609b74ffae8d3772eb207e256879/ghc
>---------------------------------------------------------------
commit 810b1e224cc0609b74ffae8d3772eb207e256879
Author: Andrey Mokhov <andrey.mokhov at gmail.com>
Date: Mon Aug 10 01:39:47 2015 +0100
Rename getHsSources to getPackageSources.
>---------------------------------------------------------------
810b1e224cc0609b74ffae8d3772eb207e256879
src/Settings/Util.hs | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/src/Settings/Util.hs b/src/Settings/Util.hs
index 13e5be0..675ba1b 100644
--- a/src/Settings/Util.hs
+++ b/src/Settings/Util.hs
@@ -5,7 +5,7 @@ module Settings.Util (
getFlag, getSetting, getSettingList,
getPkgData, getPkgDataList,
getPackagePath, getTargetPath, getTargetDirectory,
- getHsSources,
+ getPackageSources,
appendCcArgs,
needBuilder
-- argBuilderPath, argStagedBuilderPath,
@@ -73,8 +73,8 @@ getTargetDirectory :: Expr FilePath
getTargetDirectory = liftM2 targetDirectory getStage getPackage
-- Find all Haskell source files for the current target
-getHsSources :: Expr [FilePath]
-getHsSources = do
+getPackageSources :: Expr [FilePath]
+getPackageSources = do
path <- getTargetPath
pkgPath <- getPackagePath
srcDirs <- getPkgDataList SrcDirs
More information about the ghc-commits
mailing list