mirror of
https://github.com/haskell-effectful/effectful.git
synced 2024-11-27 01:45:16 +03:00
Make the argument of Put lazy
This commit is contained in:
parent
e441145189
commit
134f3c690f
@ -46,7 +46,7 @@ import qualified Effectful.State.MVar as SM
|
||||
-- depends on the interpretation.
|
||||
data State s :: Effect where
|
||||
Get :: State s m s
|
||||
Put :: s -> State s m ()
|
||||
Put :: ~s -> State s m ()
|
||||
State :: (s -> (a, s)) -> State s m a
|
||||
StateM :: (s -> m (a, s)) -> State s m a
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user