finished MonadRWS

This commit is contained in:
stefan-hoeck 2021-01-20 05:58:19 +01:00
parent e906b28cae
commit d36a234041
2 changed files with 15 additions and 0 deletions

View File

@ -2,3 +2,6 @@ module Control.Monad.RWS
import public Control.Monad.RWS.CPS as Control.Monad.RWS
import public Control.Monad.RWS.Interface as Control.Monad.RWS
import public Control.Monad.Reader.Interface as Control.Monad.RWS
import public Control.Monad.Writer.Interface as Control.Monad.RWS
import public Control.Monad.State.Interface as Control.Monad.RWS

View File

@ -1 +1,13 @@
module Control.Monad.RWS.Interface
import Control.Monad.RWS.CPS
import Control.Monad.Reader.Interface
import Control.Monad.State.Interface
import Control.Monad.Writer.Interface
public export
interface (MonadReader r m, MonadWriter w m, MonadState s m) =>
MonadRWS r w s m | m where
public export
(Monoid w, Monad m) => MonadRWS r w s (RWST r w s m) where