This commit is contained in:
Daniel Gröber 2016-07-16 03:45:23 +02:00
parent 01e3b8e3d6
commit 5fefb250de

View File

@ -48,12 +48,12 @@ type GhcModT m = GmT (GmOutT m)
newtype GmOutT m a = GmOutT { newtype GmOutT m a = GmOutT {
unGmOutT :: ReaderT GhcModOut m a unGmOutT :: ReaderT GhcModOut m a
} deriving ( Functor } deriving ( Functor
, Applicative , Applicative
, Alternative , Alternative
, Monad , Monad
, MonadPlus , MonadPlus
, MonadTrans , MonadTrans
) )
newtype GmT m a = GmT { newtype GmT m a = GmT {
unGmT :: StateT GhcModState unGmT :: StateT GhcModState