github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-15 01:51:39 +03:00
Code Issues Projects Releases Wiki Activity

Rename runValueEffects to runDomainEffects.

Browse Source
This commit is contained in:
Rob Rix 2018-12-11 13:44:47 -05:00
parent 63a5bf4b25
commit 0d7625d9ab
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/Semantic/Analysis.hs
View File

@ -103,9 +103,9 @@ evaluate lang perModule runTerm modules = do
. raiseHandler (runReader (CurrentScope scopeAddress)) . raiseHandler (runReader (CurrentScope scopeAddress))
. runReturn . runReturn
. runLoopControl . runLoopControl
. perModule (runValueEffects . moduleBody) . perModule (runDomainEffects . moduleBody)
runValueEffects = raiseHandler runInterpose . runBoolean . runWhile . runFunction runTerm . either ((unit <$) . definePrelude) runTerm runDomainEffects = raiseHandler runInterpose . runBoolean . runWhile . runFunction runTerm . either ((unit <$) . definePrelude) runTerm
-- | Evaluate a term recursively, applying the passed function at every recursive position. -- | Evaluate a term recursively, applying the passed function at every recursive position.
-- --