Update comments.
authorAndrey Mokhov <andrey.mokhov@gmail.com>
Tue, 10 May 2016 01:31:16 +0000 (02:31 +0100)
committerAndrey Mokhov <andrey.mokhov@gmail.com>
Tue, 10 May 2016 01:31:16 +0000 (02:31 +0100)
[skip ci]

src/Oracles/ModuleFiles.hs
src/Rules/Dependencies.hs
src/Rules/Library.hs
src/Settings/Paths.hs

index 897b2e0..e77d2ba 100644 (file)
@@ -45,10 +45,10 @@ encodeModule dir file
 
 -- | Find the generator for a given 'Context' and a source file. For example:
 -- findGenerator (Context Stage1 compiler vanilla)
---               ".build/stage1/compiler/build/Lexer.hs"
+--               "_build/stage1/compiler/build/Lexer.hs"
 -- == Just ("compiler/parser/Lexer.x", Alex)
 -- findGenerator (Context Stage1 base vanilla)
---               ".build/stage1/base/build/Prelude.hs"
+--               "_build/stage1/base/build/Prelude.hs"
 -- == Nothing
 findGenerator :: Context -> FilePath -> Action (Maybe (FilePath, Builder))
 findGenerator Context {..} file = do
index f5d781a..78f4d40 100644 (file)
@@ -49,8 +49,8 @@ buildPackageDependencies rs context@Context {..} =
 
 -- Given a 'Context' and a 'FilePath' to a source file, compute the 'FilePath'
 -- to its dependencies. For example, in vanillaContext Stage1 rts:
--- * "Task.c"                          -> ".build/stage1/rts/Task.c.deps"
--- * ".build/stage1/rts/AutoApply.cmm" -> ".build/stage1/rts/AutoApply.cmm.deps"
+-- * "Task.c"                          -> "_build/stage1/rts/Task.c.deps"
+-- * "_build/stage1/rts/AutoApply.cmm" -> "_build/stage1/rts/AutoApply.cmm.deps"
 src2dep :: Context -> FilePath -> FilePath
 src2dep context src
     | buildRootPath `isPrefixOf` src = src <.> "deps"
@@ -58,8 +58,8 @@ src2dep context src
 
 -- Given a 'Context' and a 'FilePath' to a file with dependencies, compute the
 -- 'FilePath' to the source file. For example, in vanillaContext Stage1 rts:
--- * ".build/stage1/rts/Task.c.deps"        -> "Task.c"
--- * ".build/stage1/rts/AutoApply.cmm.deps" -> ".build/stage1/rts/AutoApply.cmm"
+-- * "_build/stage1/rts/Task.c.deps"        -> "Task.c"
+-- * "_build/stage1/rts/AutoApply.cmm.deps" -> "_build/stage1/rts/AutoApply.cmm"
 dep2src :: Context -> FilePath -> FilePath
 dep2src context@Context {..} dep
     | takeBaseName dep `elem` [ "AutoApply.cmm", "Evac_thr.c", "Scav_thr.c" ] = src
index 0538e4e..a45b591 100644 (file)
@@ -76,8 +76,8 @@ buildPackageGhciLibrary context@Context {..} = priority 2 $ do
 -- TODO: Get rid of code duplication and simplify. See also src2dep.
 -- Given a 'Context' and a 'FilePath' to a source file, compute the 'FilePath'
 -- to its object file. For example, in Context Stage1 rts threaded:
--- * "Task.c"                          -> ".build/stage1/rts/Task.thr_o"
--- * ".build/stage1/rts/sm/Evac_thr.c" -> ".build/stage1/rts/sm/Evac_thr.thr_o"
+-- * "Task.c"                          -> "_build/stage1/rts/Task.thr_o"
+-- * "_build/stage1/rts/sm/Evac_thr.c" -> "_build/stage1/rts/sm/Evac_thr.thr_o"
 objFile :: Context -> FilePath -> FilePath
 objFile context@Context {..} src
     | buildRootPath `isPrefixOf` src = src -<.> osuf way
index 288544b..c39b12b 100644 (file)
@@ -31,28 +31,28 @@ pkgDataFile :: Context -> FilePath
 pkgDataFile context = buildPath context -/- "package-data.mk"
 
 -- | Path to the haddock file of a given 'Context', e.g.:
--- ".build/stage1/libraries/array/doc/html/array/array.haddock".
+-- "_build/stage1/libraries/array/doc/html/array/array.haddock".
 pkgHaddockFile :: Context -> FilePath
 pkgHaddockFile context@Context {..} =
     buildPath context -/- "doc/html" -/- name -/- name <.> "haddock"
   where name = pkgNameString package
 
 -- | Path to the library file of a given 'Context', e.g.:
--- ".build/stage1/libraries/array/build/libHSarray-0.5.1.0.a".
+-- "_build/stage1/libraries/array/build/libHSarray-0.5.1.0.a".
 pkgLibraryFile :: Context -> Action FilePath
 pkgLibraryFile context@Context {..} = do
     extension <- libsuf way
     pkgFile context "libHS" extension
 
 -- | Path to the auxiliary library file of a given 'Context', e.g.:
--- ".build/stage1/compiler/build/libHSghc-8.1-0.a".
+-- "_build/stage1/compiler/build/libHSghc-8.1-0.a".
 pkgLibraryFile0 :: Context -> Action FilePath
 pkgLibraryFile0 context@Context {..} = do
     extension <- libsuf way
     pkgFile context "libHS" ("-0" ++ extension)
 
 -- | Path to the GHCi library file of a given 'Context', e.g.:
--- ".build/stage1/libraries/array/build/HSarray-0.5.1.0.o".
+-- "_build/stage1/libraries/array/build/HSarray-0.5.1.0.o".
 pkgGhciLibraryFile :: Context -> Action FilePath
 pkgGhciLibraryFile context = pkgFile context "HS" ".o"