Rename src/Rules/Actions.hs -> src/Util.hs
authorAndrey Mokhov <andrey.mokhov@gmail.com>
Sun, 30 Oct 2016 01:29:51 +0000 (01:29 +0000)
committerAndrey Mokhov <andrey.mokhov@gmail.com>
Sun, 30 Oct 2016 01:29:51 +0000 (01:29 +0000)
18 files changed:
hadrian.cabal
src/Rules/Clean.hs
src/Rules/Compile.hs
src/Rules/Configure.hs
src/Rules/Data.hs
src/Rules/Dependencies.hs
src/Rules/Documentation.hs
src/Rules/Generate.hs
src/Rules/Gmp.hs
src/Rules/Libffi.hs
src/Rules/Library.hs
src/Rules/Perl.hs
src/Rules/Program.hs
src/Rules/Register.hs
src/Rules/SourceDist.hs
src/Rules/Test.hs
src/Settings/Builders/GhcCabal.hs
src/Util.hs [moved from src/Rules/Actions.hs with 99% similarity]

index 2f98a07..b20b17d 100644 (file)
@@ -38,7 +38,6 @@ executable hadrian
                        , Package
                        , Predicate
                        , Rules
-                       , Rules.Actions
                        , Rules.Cabal
                        , Rules.Clean
                        , Rules.Compile
@@ -106,6 +105,7 @@ executable hadrian
                        , Stage
                        , Target
                        , UserSettings
+                       , Util
                        , Way
 
     default-language:    Haskell2010
index cc04501..eebb26d 100644 (file)
@@ -2,11 +2,11 @@ module Rules.Clean (cleanRules) where
 
 import Base
 import Package
-import Rules.Actions
 import Settings
 import Settings.Path
 import Stage
 import UserSettings
+import Util
 
 cleanRules :: Rules ()
 cleanRules = do
index 6b250b4..64f8ea9 100644 (file)
@@ -6,10 +6,10 @@ import Base
 import Context
 import Expression
 import Oracles.Dependencies
-import Rules.Actions
 import Rules.Generate
 import Settings.Path
 import Target
+import Util
 
 compilePackage :: [(Resource, Int)] -> Context -> Rules ()
 compilePackage rs context@Context {..} = do
index 6eb8b4e..afc751f 100644 (file)
@@ -7,11 +7,11 @@ import Builder
 import CmdLineFlag
 import Context
 import GHC
-import Rules.Actions
 import Rules.Generators.GhcAutoconfH
 import Stage
 import Target
 import UserSettings
+import Util
 
 configureRules :: Rules ()
 configureRules = do
index be700f4..65c6392 100644 (file)
@@ -6,12 +6,12 @@ import Expression
 import GHC
 import Oracles.Config.Setting
 import Oracles.Dependencies
-import Rules.Actions
 import Rules.Generate
 import Rules.Libffi
 import Settings.Path
 import Target
 import UserSettings
+import Util
 
 -- | Build @package-data.mk@ by using ghc-cabal utility to process .cabal files.
 buildPackageData :: Context -> Rules ()
index 8230136..04c4f1f 100644 (file)
@@ -6,9 +6,9 @@ import Base
 import Context
 import Expression
 import Oracles.ModuleFiles
-import Rules.Actions
 import Settings.Path
 import Target
+import Util
 
 buildPackageDependencies :: [(Resource, Int)] -> Context -> Rules ()
 buildPackageDependencies rs context@Context {..} =
index 4241b46..cf54e0a 100644 (file)
@@ -7,10 +7,10 @@ import Flavour
 import GHC
 import Oracles.ModuleFiles
 import Oracles.PackageData
-import Rules.Actions
 import Settings
 import Settings.Path
 import Target
+import Util
 
 haddockHtmlLib :: FilePath
 haddockHtmlLib = "inplace/lib/html/haddock-util.js"
index fed6f51..0141f29 100644 (file)
@@ -11,7 +11,6 @@ import Expression
 import GHC
 import Oracles.ModuleFiles
 import Predicate
-import Rules.Actions
 import Rules.Generators.ConfigHs
 import Rules.Generators.GhcAutoconfH
 import Rules.Generators.GhcBootPlatformH
@@ -24,6 +23,7 @@ import Settings.Packages.Rts
 import Settings.Path
 import Target
 import UserSettings
+import Util
 
 installTargets :: [FilePath]
 installTargets = [ "inplace/lib/ghc-usage.txt"
index 7c8a2a8..1024533 100644 (file)
@@ -5,11 +5,11 @@ import Builder
 import Expression
 import GHC
 import Oracles.Config.Setting
-import Rules.Actions
 import Settings.Packages.IntegerGmp
 import Settings.Path
 import Target
 import UserSettings
+import Util
 
 gmpBase :: FilePath
 gmpBase = pkgPath integerGmp -/- "gmp"
index 0aba808..ae1c06f 100644 (file)
@@ -1,9 +1,9 @@
 module Rules.Libffi (rtsBuildPath, libffiRules, libffiDependencies) where
 
-import Rules.Actions
 import Settings.Builders.Common
 import Settings.Packages.Rts
 import Target
+import Util
 
 -- TODO: this should be moved elsewhere
 rtsBuildPath :: FilePath
index 132105a..2deb6f9 100644 (file)
@@ -10,11 +10,11 @@ import Flavour
 import GHC
 import Oracles.ModuleFiles
 import Oracles.PackageData
-import Rules.Actions
 import Settings
 import Settings.Path
 import Target
 import UserSettings
+import Util
 
 buildPackageLibrary :: Context -> Rules ()
 buildPackageLibrary context@Context {..} = do
index 74d492f..5b81011 100644 (file)
@@ -2,7 +2,7 @@ module Rules.Perl (perlScriptRules) where
 
 import Base
 import Expression
-import Rules.Actions
+import Util
 
 -- | Build Perl scripts, such as @ghc-split@, from their literate Perl sources.
 perlScriptRules :: Rules ()
index 1531599..e2b1485 100644 (file)
@@ -10,13 +10,13 @@ import Oracles.Config.Setting
 import Oracles.Dependencies
 import Oracles.ModuleFiles
 import Oracles.PackageData
-import Rules.Actions
 import Rules.Wrappers.Ghc
 import Rules.Wrappers.GhcPkg
 import Settings
 import Settings.Path
 import Target
 import UserSettings
+import Util
 
 -- | Wrapper is an expression depending on the 'FilePath' to the wrapped binary.
 type Wrapper = FilePath -> Expr String
index 4ed25a6..17bacd2 100644 (file)
@@ -4,12 +4,12 @@ import Base
 import Context
 import Expression
 import GHC
-import Rules.Actions
 import Rules.Libffi
 import Settings.Packages.Rts
 import Settings.Path
 import Target
 import UserSettings
+import Util
 
 -- | Build rules for registering packages and initialising package databases
 -- by running the @ghc-pkg@ utility.
index a2cc8f4..9c49878 100644 (file)
@@ -4,8 +4,8 @@ import Base
 import Builder
 import Oracles.Config.Setting
 import Oracles.DirectoryContent
-import Rules.Actions
 import UserSettings
+import Util
 
 sourceDistRules :: Rules ()
 sourceDistRules = do
index eb2b92c..4b38180 100644 (file)
@@ -8,10 +8,10 @@ import GHC
 import Oracles.Config.Flag
 import Oracles.Config.Setting
 import Oracles.Path
-import Rules.Actions
 import Settings
 import Settings.Path
 import Target
+import Util
 
 -- TODO: clean up after testing
 testRules :: Rules ()
index 7a0669a..2366de5 100644 (file)
@@ -4,8 +4,8 @@ module Settings.Builders.GhcCabal (
 
 import Context
 import Flavour
-import Rules.Actions
 import Settings.Builders.Common
+import Util
 
 ghcCabalBuilderArgs :: Args
 ghcCabalBuilderArgs = builder GhcCabal ? do
similarity index 99%
rename from src/Rules/Actions.hs
rename to src/Util.hs
index f544232..36030e5 100644 (file)
@@ -1,4 +1,4 @@
-module Rules.Actions (
+module Util (
     build, buildWithCmdOptions, buildWithResources, copyFile, fixFile, moveFile,
     removeFile, copyDirectory, copyDirectoryContent, createDirectory,
     moveDirectory, removeDirectory, applyPatch, runBuilder, runBuilderWith,