github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-22 06:11:49 +03:00
Code Issues Projects Releases Wiki Activity

Spell out the parameters to the synonyms.

Browse Source
This commit is contained in:
Rob Rix 2018-03-26 12:00:26 -04:00
parent 1e2f63adaf
commit 719f33106d
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/Control/Abstract/Evaluator.hs
View File

@ -185,10 +185,10 @@ instance (Effectful m, Members '[Resumable exc] effects, Monad (m effects)) => M
-- | The environment for an abstract value type. -- | The environment for an abstract value type.
type EnvironmentFor v = Env.Environment (LocationFor v) v type EnvironmentFor value = Env.Environment (LocationFor value) value
-- | The exports for an abstract value type. -- | The exports for an abstract value type.
type ExportsFor v = Export.Exports (LocationFor v) v type ExportsFor value = Export.Exports (LocationFor value) value
-- | The 'Heap' for an abstract value type. -- | The 'Heap' for an abstract value type.
type HeapFor value = Heap (LocationFor value) value type HeapFor value = Heap (LocationFor value) value