[commit: ghc] wip/nfs-locking: Remove redundant imports, drop Stage1Only. (428e148)

[git at git.haskell.org]

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

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

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

commit 428e148afb2a043419f3be83c56e05489b4e5efe
Author: Andrey Mokhov <andrey.mokhov at gmail.com>
Date:   Fri Dec 26 23:05:12 2014 +0000

    Remove redundant imports, drop Stage1Only.


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

428e148afb2a043419f3be83c56e05489b4e5efe
 src/Oracles.hs | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/src/Oracles.hs b/src/Oracles.hs
index 971d5c6..08d668e 100644
--- a/src/Oracles.hs
+++ b/src/Oracles.hs
@@ -12,11 +12,10 @@ module Oracles (
     oracleRules
     ) where
 
-import Development.Shake.Config
 import Development.Shake.Rule
+import Development.Shake.Config
 import Development.Shake.Classes
 import Control.Monad hiding (when, unless)
-import qualified System.Directory as System
 import qualified Data.HashMap.Strict as M
 import qualified Prelude
 import Prelude hiding (not, (&&), (||))
@@ -129,7 +128,7 @@ argOption opt = do
     opt' <- option opt
     arg [opt']
 
-data Flag = LaxDeps | Stage1Only | DynamicGhcPrograms | GhcWithInterpreter | HsColourSrcs
+data Flag = LaxDeps | DynamicGhcPrograms | GhcWithInterpreter | HsColourSrcs
           | GccIsClang | GccLt46 | CrossCompiling | Validating | PlatformSupportsSharedLibs
           | WindowsHost
 
@@ -157,7 +156,6 @@ test WindowsHost = do
 test flag = do
     (key, defaultValue) <- return $ case flag of
         LaxDeps            -> ("lax-dependencies"    , False) -- TODO: move flags to a separate file
-        Stage1Only         -> ("stage-1-only"        , False) -- TODO: target only
         DynamicGhcPrograms -> ("dynamic-ghc-programs", False)
         GccIsClang         -> ("gcc-is-clang"        , False)
         GccLt46            -> ("gcc-lt-46"           , False)