stylish-haskell

Author: jhrcek

hls-graph/src/Development/IDE/Graph/Internal/Database.hs

@@ -33,14 +33,14 @@ import           Data.Traversable                     (for)
 import           Data.Tuple.Extra
 import           Debug.Trace                          (traceM)
 import           Development.IDE.Graph.Classes
+import           Development.IDE.Graph.Internal.Key
 import           Development.IDE.Graph.Internal.Rules
 import           Development.IDE.Graph.Internal.Types
 import qualified Focus
 import qualified ListT
 import qualified StmContainers.Map                    as SMap
 import           System.IO.Unsafe
 import           System.Time.Extra                    (duration, sleep)
-import           Development.IDE.Graph.Internal.Key
 
 
 newDatabase :: Dynamic -> TheRules -> IO Database

hls-graph/src/Development/IDE/Graph/Internal/Key.hs

@@ -1,6 +1,6 @@
+{-# LANGUAGE DerivingStrategies #-}
 {-# LANGUAGE PatternSynonyms    #-}
 {-# LANGUAGE ViewPatterns       #-}
-{-# LANGUAGE DerivingStrategies #-}
 
 module Development.IDE.Graph.Internal.Key
     ( Key -- Opaque - don't expose constructor, use newKey to create

hls-graph/src/Development/IDE/Graph/KeyMap.hs

@@ -12,4 +12,4 @@ module Development.IDE.Graph.KeyMap(
       restrictKeysKeyMap,
     ) where
 
-import Development.IDE.Graph.Internal.Key
+import           Development.IDE.Graph.Internal.Key

hls-graph/src/Development/IDE/Graph/KeySet.hs

@@ -13,4 +13,4 @@ module Development.IDE.Graph.KeySet(
       lengthKeySet,
     ) where
 
-import Development.IDE.Graph.Internal.Key
+import           Development.IDE.Graph.Internal.Key

hls-graph/test/DatabaseSpec.hs

@@ -2,14 +2,14 @@
 
 module DatabaseSpec where
 
-import           Development.IDE.Graph                (shakeOptions)
-import           Development.IDE.Graph.Database       (shakeNewDatabase,
-                                                       shakeRunDatabase)
+import           Development.IDE.Graph                 (shakeOptions)
+import           Development.IDE.Graph.Database        (shakeNewDatabase,
+                                                        shakeRunDatabase)
+import           Development.IDE.Graph.Internal.Action (apply1)
+import           Development.IDE.Graph.Internal.Rules  (addRule)
 import           Development.IDE.Graph.Internal.Types
-import Development.IDE.Graph.Internal.Action ( apply1 )
-import Development.IDE.Graph.Internal.Rules ( addRule )
 import           Example
-import           System.Time.Extra                    (timeout)
+import           System.Time.Extra                     (timeout)
 import           Test.Hspec
 
 spec :: Spec