stylish haskell

Author: coot

io-classes/src/Control/Monad/Class/MonadUnique.hs

@@ -1,21 +1,21 @@
-{-# LANGUAGE DefaultSignatures #-}
+{-# LANGUAGE DefaultSignatures      #-}
 {-# LANGUAGE TypeFamilyDependencies #-}
 
 -- | A generalisation of the
 -- <https://hackage.haskell.org/package/base/docs/Data-Unique.html Data.Unique>
 -- API to both 'IO' and <https://hackage.haskell.org/package/io-sim IOSim>.
 --
-module Control.Monad.Class.MonadUnique (
-  MonadUnique (..),
-  UniqueFor (..),
-) where
+module Control.Monad.Class.MonadUnique
+  ( MonadUnique (..)
+  , UniqueFor (..)
+  ) where
 
 -- base
 import Data.Kind (Type)
 import Data.Unique qualified as IO
 
 -- transformers
-import Control.Monad.Reader (MonadTrans(..), ReaderT(..), lift)
+import Control.Monad.Reader (MonadTrans (..), ReaderT (..), lift)
 
 
 class (Monad m, Eq (Unique m), Ord (Unique m)) => MonadUnique m where

io-sim/src/Control/Monad/IOSim/Types.hs

@@ -105,7 +105,7 @@ import Control.Monad.Fail qualified as Fail
 import Data.Bifoldable
 import Data.Bifunctor (bimap)
 import Data.Dynamic (Dynamic, toDyn)
-import Data.Hashable (Hashable(hash))
+import Data.Hashable (Hashable (hash))
 import Data.List.Trace qualified as Trace
 import Data.Map.Strict (Map)
 import Data.Maybe (fromMaybe)