From 0d7625d9ab476cba9af22a7b80c506d7f98818f4 Mon Sep 17 00:00:00 2001
From: Rob Rix <rob.rix@me.com>
Date: Tue, 11 Dec 2018 13:44:47 -0500
Subject: [PATCH] Rename runValueEffects to runDomainEffects.

---
 src/Semantic/Analysis.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Semantic/Analysis.hs b/src/Semantic/Analysis.hs
index 569376e64..3d99102de 100644
--- a/src/Semantic/Analysis.hs
+++ b/src/Semantic/Analysis.hs
@@ -103,9 +103,9 @@ evaluate lang perModule runTerm modules = do
                   . raiseHandler (runReader (CurrentScope scopeAddress))
                   . runReturn
                   . 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.
 --