diff --git a/src/Semantic/Analysis.hs b/src/Semantic/Analysis.hs
index 6ae4ae2db..733491b22 100644
--- a/src/Semantic/Analysis.hs
+++ b/src/Semantic/Analysis.hs
@@ -108,7 +108,7 @@ evaluate lang perModule runTerm modules = do
 
 -- | Evaluate a term recursively, applying the passed function at every recursive position.
 --
---   This calls out to the 'Evaluatable' instances, will be passed to 'runValueEffects', and can have other functions composed after it to e.g. intercept effects arising in the evaluation of the term.
+--   This calls out to the 'Evaluatable' instances, and can have other functions composed after it to e.g. intercept effects arising in the evaluation of the term.
 evalTerm :: ( Carrier sig m
             , Declarations term
             , Evaluatable (Base term)