git.iko.soy/typeable/swagger2
on master help sign in
remove ExceptT for compatibility with ghc 7.8
16a968dmoss
src/Data/Swagger/Declare.hs+1−4
compare with master
unifiedsplit
@@ -18,7 +18,6 @@ import Control.Monad
18import Control.Monad.Trans
18import Control.Monad.Trans
19import Control.Monad.Cont (ContT)
19import Control.Monad.Cont (ContT)
20import Control.Monad.Error (Error, ErrorT)
20import Control.Monad.Error (Error, ErrorT)
21−import Control.Monad.Except (ExceptT)
22import Control.Monad.List (ListT)
21import Control.Monad.List (ListT)
23import Control.Monad.Reader (ReaderT)
22import Control.Monad.Reader (ReaderT)
24import Control.Monad.Trans.Identity (IdentityT)
23import Control.Monad.Trans.Identity (IdentityT)
@@ -157,9 +156,7 @@ instance (Error e, MonadDeclare d m) => MonadDeclare d (ErrorT e m) where
157 declare = lift . declare
156 declare = lift . declare
158 look = lift look
157 look = lift look
159
158
160−instance MonadDeclare d m => MonadDeclare d (ExceptT e m) where
159+-- Note: ExceptT not provided because it is not available in ghc 7.8.
161− declare = lift . declare
162− look = lift look
163
160
164instance MonadDeclare d m => MonadDeclare d (IdentityT m) where
161instance MonadDeclare d m => MonadDeclare d (IdentityT m) where
165 declare = lift . declare
162 declare = lift . declare