Permalink
Browse files

Small formatting fixes.

  • Loading branch information...
1 parent 88d41b5 commit 8f05eb40983dafdb0f4dce9e18ecee05559ef61c @mvv committed Nov 11, 2011
Showing with 6 additions and 4 deletions.
  1. +6 −4 src/Control/Monad/Base.hs
@@ -6,12 +6,13 @@
{-# LANGUAGE UndecidableInstances #-}
module Control.Monad.Base (
- MonadBase(..), liftBaseDefault
+ MonadBase(..),
+ liftBaseDefault
) where
import Data.Monoid
import Data.Functor.Identity
-import Control.Applicative ( Applicative )
+import Control.Applicative (Applicative)
import qualified Control.Monad.ST.Lazy as L
import qualified Control.Monad.ST.Strict as S
import Control.Monad.Trans.Class
@@ -27,9 +28,10 @@ import qualified Control.Monad.Trans.RWS.Lazy as L
import qualified Control.Monad.Trans.RWS.Strict as S
import Control.Monad.Trans.Error
import Control.Monad.Trans.Cont
-import GHC.Conc.Sync ( STM )
+import GHC.Conc.Sync (STM)
-class (Applicative b, Applicative m, Monad b, Monad m) MonadBase b m | m b where
+class (Applicative b, Applicative m, Monad b, Monad m)
+ MonadBase b m | m b where
-- | Lift a computation from the base monad
liftBase b α m α

0 comments on commit 8f05eb4

Please sign in to comment.