[commit: ghc] wip/nfs-locking: Fix outdated comments. (0273e3e)
git at git.haskell.org
git at git.haskell.org
Fri Oct 27 00:23:30 UTC 2017
Repository : ssh://git@git.haskell.org/ghc
On branch : wip/nfs-locking
Link : http://ghc.haskell.org/trac/ghc/changeset/0273e3ea2449f646c46059d2be4a7261571511c0/ghc
>---------------------------------------------------------------
commit 0273e3ea2449f646c46059d2be4a7261571511c0
Author: Andrey Mokhov <andrey.mokhov at gmail.com>
Date: Fri Feb 26 15:47:56 2016 +0000
Fix outdated comments.
See #210.
>---------------------------------------------------------------
0273e3ea2449f646c46059d2be4a7261571511c0
src/Oracles/ModuleFiles.hs | 14 +++++++-------
1 file changed, 7 insertions(+), 7 deletions(-)
diff --git a/src/Oracles/ModuleFiles.hs b/src/Oracles/ModuleFiles.hs
index 96e66ac..b38929c 100644
--- a/src/Oracles/ModuleFiles.hs
+++ b/src/Oracles/ModuleFiles.hs
@@ -65,16 +65,16 @@ contextFiles context at Context {..} = do
zip modules <$> askOracle (ModuleFilesKey (stage, package))
-- | This is an important oracle whose role is to find and cache module source
--- files. It takes a 'Context', looks up corresponding source directories @dirs@
--- and sorted list of module names @modules@, and for each module, e.g.
--- @A.B.C@, returns a 'FilePath' of the form @dir/A/B/C.extension@, such that
--- @dir@ belongs to @dirs@, and file @dir/A/B/C.extension@ exists, or 'Nothing'
--- if there is no such file. If more than one matching file is found an error is
--- raised. For example, for @Context Stage1 compiler vanilla@, @dirs@ will
+-- files. It takes a 'Stage' and a 'Package', looks up corresponding source
+-- directories @dirs@ and a sorted list of module names @modules@, and for each
+-- module, e.g. @A.B.C@, returns a 'FilePath' of the form @dir/A/B/C.extension@,
+-- such that @dir@ belongs to @dirs@, and file @dir/A/B/C.extension@ exists, or
+-- 'Nothing' if there is no such file. If more than one matching file is found
+-- an error is raised. For example, for 'Stage1' and 'compiler', @dirs@ will
-- contain ["compiler/codeGen", "compiler/parser"], and @modules@ will contain
-- ["CodeGen.Platform.ARM", "Config", "Lexer"]; the oracle will produce a list
-- containing [Just "compiler/codeGen/CodeGen/Platform/ARM.hs", Nothing,
--- Just "compiler/parser/Lexer.x"].
+-- Just "compiler/parser/Lexer.x"]. The oracle ignores @.(l)hs-boot@ files.
moduleFilesOracle :: Rules ()
moduleFilesOracle = void $ do
void $ addOracle $ \(ModuleFilesKey (stage, package)) -> do
More information about the ghc-commits
mailing list