Safe Haskell	None
Language	Haskell2010

Control.Monad.Trans.MultiGST.Strict

Contents

MonadMulti classes
run-functions
with-functions
without-functions
other functions

Description

Alternative multi-valued version of mtl's RWS / RWST. In contrast to MultiRWS(T) this version only takes a single list of types as parameter, but with additional encoding of the allowed access for each element. This supports the MonadMultiGet notion more succinctly, i.e. to pass a "state" element to a function that only requiresexpects readget access. This is not possible with MultiRWS.

Synopsis

newtype MultiGSTT ts m a = MultiGSTT {
- runMultiGSTTRaw :: StateT (HListM ts) m a
}
type MultiGSTTNull = MultiGSTT '[]
type MultiGST r = MultiGSTT r Identity
type ContainsReader = HListMContains GettableFlag
type ContainsState = HListMContains SettableFlag
type ContainsWriter = HListMContains TellableFlag
class Monad m => MonadMultiReader a m where
class (Monad m, Monoid a) => MonadMultiWriter a m where
class Monad m => MonadMultiGet a m where
data CanReadWrite a
- = Gettable a
- | Settable a
- | Tellable a
runMultiGSTTNil :: Monad m => MultiGSTT '[] m a -> m a
runMultiGSTTNil_ :: Monad m => MultiGSTT '[] m a -> m ()
withReader :: Monad m => t -> MultiGSTT (Gettable t ': tr) m a -> MultiGSTT tr m a
withReader_ :: Monad m => t -> MultiGSTT (Gettable t ': tr) m a -> MultiGSTT tr m ()
withWriter :: (Monoid t, Monad m) => MultiGSTT (Tellable t ': tr) m a -> MultiGSTT tr m (a, t)
withWriterAW :: (Monoid t, Monad m) => MultiGSTT (Tellable t ': tr) m a -> MultiGSTT tr m (a, t)
withWriterWA :: (Monoid t, Monad m) => MultiGSTT (Tellable t ': tr) m a -> MultiGSTT tr m (t, a)
withWriterW :: (Monoid t, Monad m) => MultiGSTT (Tellable t ': tr) m a -> MultiGSTT tr m t
withState :: Monad m => t -> MultiGSTT (Settable t ': tr) m a -> MultiGSTT tr m (a, t)
withStateAS :: Monad m => t -> MultiGSTT (Settable t ': tr) m a -> MultiGSTT tr m (a, t)
withStateSA :: Monad m => t -> MultiGSTT (Settable t ': tr) m a -> MultiGSTT tr m (t, a)
withStateA :: Monad m => t -> MultiGSTT (Settable t ': tr) m a -> MultiGSTT tr m a
withStateS :: Monad m => t -> MultiGSTT (Settable t ': tr) m a -> MultiGSTT tr m t
withState_ :: Monad m => t -> MultiGSTT (Settable t ': tr) m a -> MultiGSTT tr m ()
without :: Monad m => MultiGSTT tr m a -> MultiGSTT (ct ': tr) m a
mGetRaw :: Monad m => MultiGSTT ts m (HListM ts)
mSetRaw :: Monad m => HListM ts -> MultiGSTT ts m ()
mapMultiGSTT :: ts ~ HListM cts => (m (a, ts) -> m' (a', ts)) -> MultiGSTT cts m a -> MultiGSTT cts m' a'

Documentation

newtype MultiGSTT ts m a #

Constructors

MultiGSTT
Fields runMultiGSTTRaw :: StateT (HListM ts) m a

Instances

(Monad m, HListMContains GettableFlag a cts) => MonadMultiGet a (MultiGSTT cts m) #
Instance details Defined in Control.Monad.Trans.MultiGST.Strict Methods mGet :: MultiGSTT cts m a #
(Monad m, HListMContains SettableFlag a cts) => MonadMultiState a (MultiGSTT cts m) #
Instance details Defined in Control.Monad.Trans.MultiGST.Strict Methods mSet :: a -> MultiGSTT cts m () #
(Monad m, Monoid a, HListMContains TellableFlag a cts) => MonadMultiWriter a (MultiGSTT cts m) #
Instance details Defined in Control.Monad.Trans.MultiGST.Strict Methods mTell :: a -> MultiGSTT cts m () #
MonadTrans (MultiGSTT ts) #
Instance details Defined in Control.Monad.Trans.MultiGST.Strict Methods lift :: Monad m => m a -> MultiGSTT ts m a #
Monad m => Monad (MultiGSTT ts m) #
Instance details Defined in Control.Monad.Trans.MultiGST.Strict Methods (>>=) :: MultiGSTT ts m a -> (a -> MultiGSTT ts m b) -> MultiGSTT ts m b # (>>) :: MultiGSTT ts m a -> MultiGSTT ts m b -> MultiGSTT ts m b # return :: a -> MultiGSTT ts m a # fail :: String -> MultiGSTT ts m a #
Functor m => Functor (MultiGSTT ts m) #
Instance details Defined in Control.Monad.Trans.MultiGST.Strict Methods fmap :: (a -> b) -> MultiGSTT ts m a -> MultiGSTT ts m b # (<$) :: a -> MultiGSTT ts m b -> MultiGSTT ts m a #
Monad m => Applicative (MultiGSTT ts m) #
Instance details Defined in Control.Monad.Trans.MultiGST.Strict Methods pure :: a -> MultiGSTT ts m a # (<>) :: MultiGSTT ts m (a -> b) -> MultiGSTT ts m a -> MultiGSTT ts m b # liftA2 :: (a -> b -> c) -> MultiGSTT ts m a -> MultiGSTT ts m b -> MultiGSTT ts m c # (>) :: MultiGSTT ts m a -> MultiGSTT ts m b -> MultiGSTT ts m b # (<*) :: MultiGSTT ts m a -> MultiGSTT ts m b -> MultiGSTT ts m a #

type MultiGSTTNull = MultiGSTT '[] #

type MultiGST r = MultiGSTT r Identity #

MonadMulti classes

type ContainsReader = HListMContains GettableFlag #

type ContainsState = HListMContains SettableFlag #

type ContainsWriter = HListMContains TellableFlag #

class Monad m => MonadMultiReader a m where #

All methods must be defined.

The idea is: Any monad stack is instance of MonadMultiReader a, iff the stack contains a MultiReaderT x with a element of x.

Minimal complete definition

mAsk

Methods

mAsk #

Arguments

:: m a

Access to a specific type in the environment.

Instances

(MonadTrans t, Monad (t m), MonadMultiReader a m) => MonadMultiReader a (t m) #
Instance details Defined in Control.Monad.Trans.MultiReader.Class Methods mAsk :: t m a #
(Monad m, ContainsType a c) => MonadMultiReader a (MultiReaderT c m) #
Instance details Defined in Control.Monad.Trans.MultiReader.Strict Methods mAsk :: MultiReaderT c m a #
(Monad m, ContainsType a c) => MonadMultiReader a (MultiReaderT c m) #
Instance details Defined in Control.Monad.Trans.MultiReader.Lazy Methods mAsk :: MultiReaderT c m a #
(Monad m, ContainsType a r) => MonadMultiReader a (MultiRWST r w s m) #
Instance details Defined in Control.Monad.Trans.MultiRWS.Strict Methods mAsk :: MultiRWST r w s m a #
(Monad m, ContainsType a r) => MonadMultiReader a (MultiRWST r w s m) #
Instance details Defined in Control.Monad.Trans.MultiRWS.Lazy Methods mAsk :: MultiRWST r w s m a #

class (Monad m, Monoid a) => MonadMultiWriter a m where #

Minimal complete definition

mTell

Methods

mTell :: a -> m () #

Instances

(MonadTrans t, Monad (t m), MonadMultiWriter a m) => MonadMultiWriter a (t m) #
Instance details Defined in Control.Monad.Trans.MultiWriter.Class Methods mTell :: a -> t m () #
(Monad m, ContainsType a c, Monoid a) => MonadMultiWriter a (MultiWriterT c m) #
Instance details Defined in Control.Monad.Trans.MultiWriter.Strict Methods mTell :: a -> MultiWriterT c m () #
(Monad m, ContainsType a c, Monoid a) => MonadMultiWriter a (MultiWriterT c m) #
Instance details Defined in Control.Monad.Trans.MultiWriter.Lazy Methods mTell :: a -> MultiWriterT c m () #
(Monad m, Monoid a, HListMContains TellableFlag a cts) => MonadMultiWriter a (MultiGSTT cts m) #
Instance details Defined in Control.Monad.Trans.MultiGST.Strict Methods mTell :: a -> MultiGSTT cts m () #
(Monad m, Monoid a, HListMContains TellableFlag a cts) => MonadMultiWriter a (MultiGSTT cts m) #
Instance details Defined in Control.Monad.Trans.MultiGST.Lazy Methods mTell :: a -> MultiGSTT cts m () #
(Monad m, ContainsType a w, Monoid a) => MonadMultiWriter a (MultiRWST r w s m) #
Instance details Defined in Control.Monad.Trans.MultiRWS.Strict Methods mTell :: a -> MultiRWST r w s m () #
(Monad m, ContainsType a w, Monoid a) => MonadMultiWriter a (MultiRWST r w s m) #
Instance details Defined in Control.Monad.Trans.MultiRWS.Lazy Methods mTell :: a -> MultiRWST r w s m () #

class Monad m => MonadMultiGet a m where #

In contrast to MonadMultiReader, MonadMultiGet is defined for State too, so it corresponds to read-access of any kind.

Note however that for MultiRWS, only the values from the state part can be accessed via MonadMultiGet, due to limitations of the design of MultiRWS and of the type system. This is issue is resolved in the MultiGST type.

Minimal complete definition

mGet

Methods

mGet #

Arguments

:: m a

Access to a specific type in the environment.

Instances

(MonadTrans t, Monad (t m), MonadMultiGet a m) => MonadMultiGet a (t m) #
Instance details Defined in Control.Monad.Trans.MultiGet.Class Methods mGet :: t m a #
(Monad m, ContainsType a c) => MonadMultiGet a (MultiStateT c m) #
Instance details Defined in Control.Monad.Trans.MultiState.Strict Methods mGet :: MultiStateT c m a #
(Monad m, ContainsType a c) => MonadMultiGet a (MultiStateT c m) #
Instance details Defined in Control.Monad.Trans.MultiState.Lazy Methods mGet :: MultiStateT c m a #
(Monad m, ContainsType a c) => MonadMultiGet a (MultiReaderT c m) #
Instance details Defined in Control.Monad.Trans.MultiReader.Strict Methods mGet :: MultiReaderT c m a #
(Monad m, ContainsType a c) => MonadMultiGet a (MultiReaderT c m) #
Instance details Defined in Control.Monad.Trans.MultiReader.Lazy Methods mGet :: MultiReaderT c m a #
(Monad m, HListMContains GettableFlag a cts) => MonadMultiGet a (MultiGSTT cts m) #
Instance details Defined in Control.Monad.Trans.MultiGST.Strict Methods mGet :: MultiGSTT cts m a #
(Monad m, HListMContains GettableFlag a cts) => MonadMultiGet a (MultiGSTT cts m) #
Instance details Defined in Control.Monad.Trans.MultiGST.Lazy Methods mGet :: MultiGSTT cts m a #
(Monad m, ContainsType a s) => MonadMultiGet a (MultiRWST r w s m) #
Instance details Defined in Control.Monad.Trans.MultiRWS.Strict Methods mGet :: MultiRWST r w s m a #
(Monad m, ContainsType a s) => MonadMultiGet a (MultiRWST r w s m) #
Instance details Defined in Control.Monad.Trans.MultiRWS.Lazy Methods mGet :: MultiRWST r w s m a #

data CanReadWrite a #

Constructors

Gettable a
Settable a
Tellable a

run-functions

runMultiGSTTNil :: Monad m => MultiGSTT '[] m a -> m a #

runMultiGSTTNil_ :: Monad m => MultiGSTT '[] m a -> m () #

with-functions

withReader :: Monad m => t -> MultiGSTT (Gettable t ': tr) m a -> MultiGSTT tr m a #

withReader_ :: Monad m => t -> MultiGSTT (Gettable t ': tr) m a -> MultiGSTT tr m () #

withWriter :: (Monoid t, Monad m) => MultiGSTT (Tellable t ': tr) m a -> MultiGSTT tr m (a, t) #

withWriterAW :: (Monoid t, Monad m) => MultiGSTT (Tellable t ': tr) m a -> MultiGSTT tr m (a, t) #

withWriterWA :: (Monoid t, Monad m) => MultiGSTT (Tellable t ': tr) m a -> MultiGSTT tr m (t, a) #

withWriterW :: (Monoid t, Monad m) => MultiGSTT (Tellable t ': tr) m a -> MultiGSTT tr m t #

withState :: Monad m => t -> MultiGSTT (Settable t ': tr) m a -> MultiGSTT tr m (a, t) #

withStateAS :: Monad m => t -> MultiGSTT (Settable t ': tr) m a -> MultiGSTT tr m (a, t) #

withStateSA :: Monad m => t -> MultiGSTT (Settable t ': tr) m a -> MultiGSTT tr m (t, a) #

withStateA :: Monad m => t -> MultiGSTT (Settable t ': tr) m a -> MultiGSTT tr m a #

withStateS :: Monad m => t -> MultiGSTT (Settable t ': tr) m a -> MultiGSTT tr m t #

withState_ :: Monad m => t -> MultiGSTT (Settable t ': tr) m a -> MultiGSTT tr m () #

without-functions

without :: Monad m => MultiGSTT tr m a -> MultiGSTT (ct ': tr) m a #

other functions

mGetRaw :: Monad m => MultiGSTT ts m (HListM ts) #

mSetRaw :: Monad m => HListM ts -> MultiGSTT ts m () #

mapMultiGSTT :: ts ~ HListM cts => (m (a, ts) -> m' (a', ts)) -> MultiGSTT cts m a -> MultiGSTT cts m' a' #