mirror of
https://github.com/github/semantic.git
synced 2024-12-22 06:11:49 +03:00
📝 the concrete effects.
This commit is contained in:
parent
38fbc49500
commit
63089985c6
@ -21,10 +21,10 @@ import Data.Semigroup
|
||||
|
||||
-- | The effects necessary for concrete interpretation.
|
||||
type Interpreter v
|
||||
= '[ Fail
|
||||
, Reader (Live (LocationFor v) v)
|
||||
, State (Store (LocationFor v) v)
|
||||
, Reader (Environment (LocationFor v) v)
|
||||
= '[ Fail -- For 'MonadFail'.
|
||||
, Reader (Live (LocationFor v) v) -- For 'MonadGC'.
|
||||
, State (Store (LocationFor v) v) -- For 'MonadStore'.
|
||||
, Reader (Environment (LocationFor v) v) -- For 'MonadEnv'.
|
||||
]
|
||||
|
||||
type MonadInterpreter v m = (MonadEnv v m, MonadStore v m, MonadFail m)
|
||||
|
Loading…
Reference in New Issue
Block a user