[commit: ghc] wip/nfs-locking: Minor revision. (6a9772a)

git at git.haskell.org git at git.haskell.org
Fri Oct 27 00:50:03 UTC 2017


Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/nfs-locking
Link       : http://ghc.haskell.org/trac/ghc/changeset/6a9772a11c4bb3284cf6f3993c4ba25896301a74/ghc

>---------------------------------------------------------------

commit 6a9772a11c4bb3284cf6f3993c4ba25896301a74
Author: Andrey Mokhov <andrey.mokhov at gmail.com>
Date:   Sun Feb 14 23:42:17 2016 +0000

    Minor revision.


>---------------------------------------------------------------

6a9772a11c4bb3284cf6f3993c4ba25896301a74
 src/Main.hs  |  1 +
 src/Rules.hs | 62 ++++++++++++++++++++++++++++++------------------------------
 2 files changed, 32 insertions(+), 31 deletions(-)

diff --git a/src/Main.hs b/src/Main.hs
index 96639d2..cf45cc3 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -27,6 +27,7 @@ main = shakeArgsWith options CmdLineFlag.cmdFlags $ \cmdLineFlags targets -> do
         Rules.Test.testRules
         Rules.buildRules
         Rules.topLevelTargets
+    options :: ShakeOptions
     options = shakeOptions
         { shakeChange   = ChangeModtimeAndDigest
         , shakeFiles    = Base.shakeFilesPath
diff --git a/src/Rules.hs b/src/Rules.hs
index e817fc1..f3db558 100644
--- a/src/Rules.hs
+++ b/src/Rules.hs
@@ -5,20 +5,20 @@ import Data.Foldable
 import Base
 import Expression
 import GHC
-import qualified Rules.Compile
-import qualified Rules.Data
-import qualified Rules.Dependencies
-import qualified Rules.Documentation
-import qualified Rules.Generate
-import qualified Rules.Resources
-import qualified Rules.Cabal
-import qualified Rules.Gmp
-import qualified Rules.Libffi
-import qualified Rules.Library
-import qualified Rules.Perl
-import qualified Rules.Program
-import qualified Rules.Register
-import qualified Rules.Setup
+import Rules.Compile
+import Rules.Data
+import Rules.Dependencies
+import Rules.Documentation
+import Rules.Generate
+import Rules.Resources
+import Rules.Cabal
+import Rules.Gmp
+import Rules.Libffi
+import Rules.Library
+import Rules.Perl
+import Rules.Program
+import Rules.Register
+import Rules.Setup
 import Settings
 
 allStages :: [Stage]
@@ -53,26 +53,26 @@ topLevelTargets = do
 
 packageRules :: Rules ()
 packageRules = do
-    resources <- Rules.Resources.resourceRules
+    resources <- resourceRules
     for_ allStages $ \stage ->
         for_ knownPackages $ \package -> do
             let context = vanillaContext stage package
-            Rules.Compile.compilePackage resources context
-            Rules.Data.buildPackageData context
-            Rules.Dependencies.buildPackageDependencies resources context
-            Rules.Documentation.buildPackageDocumentation context
-            Rules.Generate.generatePackageCode context
-            Rules.Library.buildPackageLibrary context
-            Rules.Program.buildProgram context
-            Rules.Register.registerPackage resources context
+            compilePackage            resources context
+            buildPackageData                    context
+            buildPackageDependencies  resources context
+            buildPackageDocumentation           context
+            generatePackageCode                 context
+            buildPackageLibrary                 context
+            buildProgram                        context
+            registerPackage           resources context
 
 buildRules :: Rules ()
 buildRules = do
-    Rules.Cabal.cabalRules
-    Rules.Generate.generateRules
-    Rules.Generate.copyRules
-    Rules.Gmp.gmpRules
-    Rules.Libffi.libffiRules
-    Rules.Perl.perlScriptRules
-    Rules.Setup.setupRules
-    Rules.packageRules
+    cabalRules
+    generateRules
+    copyRules
+    gmpRules
+    libffiRules
+    perlScriptRules
+    setupRules
+    packageRules



More information about the ghc-commits mailing list