Clean up.
authorAndrey Mokhov <andrey.mokhov@gmail.com>
Mon, 9 Feb 2015 22:25:30 +0000 (22:25 +0000)
committerAndrey Mokhov <andrey.mokhov@gmail.com>
Mon, 9 Feb 2015 22:25:30 +0000 (22:25 +0000)
src/Base.hs
src/Oracles/Flag.hs
src/Package/Base.hs
src/Targets.hs

index 923e13d..fa9104a 100644 (file)
@@ -7,7 +7,6 @@ module Base (
     module Data.Function,
     module Data.Monoid,
     module Data.List,
-    module Settings,
     Stage (..),
     Arg, Args,
     ShowArg (..), ShowArgs (..),
@@ -23,7 +22,6 @@ import Control.Applicative
 import Data.Function
 import Data.Monoid
 import Data.List
-import Settings
 
 data Stage = Stage0 | Stage1 | Stage2 | Stage3 deriving (Eq, Enum)
 
index fa29415..8149619 100644 (file)
@@ -7,9 +7,9 @@ module Oracles.Flag (
     test, when, unless, not, (&&), (||)
     ) where
 
-import Control.Monad hiding (when, unless)
 import qualified Prelude
 import Prelude hiding (not, (&&), (||))
+import Control.Monad hiding (when, unless)
 import Base
 import Util
 import Oracles.Base
index 2738b83..40d893e 100644 (file)
@@ -4,6 +4,7 @@ module Package.Base (
     module Ways,
     module Util,
     module Oracles,
+    module Settings,
     Package (..), Settings (..), TodoItem (..),
     defaultSettings, library, customise, updateSettings,
     commonCcArgs, commonLdArgs, commonCppArgs, commonCcWarninigArgs,
@@ -20,6 +21,7 @@ import Base
 import Ways
 import Util
 import Oracles
+import Settings
 import qualified System.Directory as S
 
 data Settings = Settings
index 19cb664..bdfb2ee 100644 (file)
@@ -5,9 +5,6 @@ module Targets (
 
 import Package.Base
 
-integerLibraryName :: String
-integerLibraryName = show integerLibrary
-
 -- These are the packages we build:
 -- TODO: this should eventually be removed and replaced by the top-level
 -- target, i.e. GHC (and perhaps, something else)