mirror of
https://github.com/github/semantic.git
synced 2024-12-22 06:11:49 +03:00
🔥 the spurious old live set reader.
This commit is contained in:
parent
19c6c2a135
commit
38fbc49500
@ -18,14 +18,12 @@ import Data.Abstract.Value
|
||||
import Data.Function (fix)
|
||||
import Data.Functor.Foldable (Base, Recursive(..))
|
||||
import Data.Semigroup
|
||||
import Data.Set
|
||||
|
||||
-- | The effects necessary for concrete interpretation.
|
||||
type Interpreter v
|
||||
= '[ Fail
|
||||
, Reader (Live (LocationFor v) v)
|
||||
, State (Store (LocationFor v) v)
|
||||
, Reader (Set (Address (LocationFor v) v))
|
||||
, Reader (Environment (LocationFor v) v)
|
||||
]
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user