git.iko.soy/obelisk
on master help sign in
cliapp: Remove orphan MonadFail instance
fc604fdAli Abrar
lib/cliapp/src/Obelisk/CliApp/Types.hs−2
compare with master
unifiedsplit
@@ -47,8 +47,6 @@ type CliThrow e m = MonadError e m
47putLog :: CliLog m => Severity -> Text -> m ()
47putLog :: CliLog m => Severity -> Text -> m ()
48putLog sev = logMessage . Output_Log . WithSeverity sev
48putLog sev = logMessage . Output_Log . WithSeverity sev
49
49
50−deriving instance MonadFail m => MonadFail (LoggingT Output m)
51−
52newtype DieT e m a = DieT { unDieT :: ReaderT (e -> (Text, Int)) (LoggingT Output m) a }
50newtype DieT e m a = DieT { unDieT :: ReaderT (e -> (Text, Int)) (LoggingT Output m) a }
53 deriving
51 deriving
54 ( Functor, Applicative, Monad, MonadIO, MonadFail
52 ( Functor, Applicative, Monad, MonadIO, MonadFail