mirror of
https://github.com/github/semantic.git
synced 2024-12-22 06:11:49 +03:00
📝 the effects in DeadCodeInterpreter.
This commit is contained in:
parent
aa708a1964
commit
342b6372e8
@ -21,10 +21,10 @@ import Data.Set
|
||||
|
||||
-- | The effects necessary for dead code analysis.
|
||||
type DeadCodeInterpreter t v
|
||||
= '[ State (Dead t)
|
||||
, Fail
|
||||
, State (Store (LocationFor v) v)
|
||||
, Reader (Environment (LocationFor v) v)
|
||||
= '[ State (Dead t) -- For 'MonadDead'.
|
||||
, Fail -- For 'MonadFail'.
|
||||
, State (Store (LocationFor v) v) -- For 'MonadStore'.
|
||||
, Reader (Environment (LocationFor v) v) -- For 'MonadEnv'.
|
||||
]
|
||||
|
||||
type DeadCodeResult t v = Final (DeadCodeInterpreter t v) v
|
||||
|
Loading…
Reference in New Issue
Block a user