imports

ndmitchell · Mar 22, 2021 · c0b281e · c0b281e
1 parent 4b8ce3b
commit c0b281e
Show file tree

Hide file tree

Showing 4 changed files with 7 additions and 11 deletions.
diff --git a/src/Development/Shake/Database.hs b/src/Development/Shake/Database.hs
@@ -32,20 +32,20 @@ module Development.Shake.Database(
 import Control.Concurrent.Extra
 import Control.Exception
 import Control.Monad
+import Control.Monad.Extra (whenJust)
 import Control.Monad.IO.Class
+import qualified Data.HashSet as HashSet
 import Data.IORef
+import Data.Maybe
 import General.Cleanup
 import Development.Shake.Internal.Errors
 import Development.Shake.Internal.Options
 import Development.Shake.Internal.Core.Rules
 import Development.Shake.Internal.Core.Run
 import Development.Shake.Internal.Core.Types
 import Development.Shake.Internal.Rules.Default
-import Development.Shake.Internal.Value (ShakeValue, SomeShakeValue(..), newKey)
-import Data.Maybe (isJust, mapMaybe, fromMaybe)
+import Development.Shake.Internal.Value (SomeShakeValue(..), newKey)
 import Development.Shake.Internal.Core.Database (markDirty, getIdFromKey)
-import Control.Monad.Extra (whenJust)
-import qualified Data.HashSet as HashSet
 
 
 data UseState

diff --git a/src/Development/Shake/Internal/Core/Build.hs b/src/Development/Shake/Internal/Core/Build.hs
@@ -37,7 +37,6 @@ import Data.List.Extra
 import Data.Either.Extra
 import System.Time.Extra
 import qualified Data.HashSet as HashSet
-import Data.IORef.Extra (atomicModifyIORef_, IORef, newIORef)
 
 
 ---------------------------------------------------------------------

diff --git a/src/Development/Shake/Internal/Core/Run.hs b/src/Development/Shake/Internal/Core/Run.hs
@@ -21,6 +21,7 @@ import Data.Tuple.Extra
 import Control.Concurrent.Extra hiding (withNumCapabilities)
 import Development.Shake.Internal.Core.Database
 import Control.Monad.IO.Class
+import qualified Control.Monad.Trans.State.Strict as State
 import General.Binary
 import Development.Shake.Classes
 import Development.Shake.Internal.Core.Storage
@@ -54,14 +55,11 @@ import General.Timing
 import General.Thread
 import General.Extra
 import General.Cleanup
+import qualified General.Ids as Ids
+import Data.Foldable (traverse_)
 import Data.Monoid
 import Prelude
-import General.Ids (Id)
-import qualified Control.Monad.Trans.State.Strict as State
-import Data.Foldable (traverse_)
 import Text.Printf
-import Development.Shake.Internal.Rules.Rerun (AlwaysRerunQ(AlwaysRerunQ))
-import qualified General.Ids as Ids
 
 
 ---------------------------------------------------------------------

diff --git a/src/Development/Shake/Internal/Core/Types.hs b/src/Development/Shake/Internal/Core/Types.hs
@@ -50,7 +50,6 @@ import Data.Semigroup
 import General.Cleanup
 import Control.Monad.Fail
 import Prelude
-import Data.HashSet (HashSet)
 
 
 ---------------------------------------------------------------------