mirror of
https://github.com/github/semantic.git
synced 2024-12-24 15:35:14 +03:00
🔥 a redundant signature.
This commit is contained in:
parent
731aed5b3c
commit
e3c996f45d
@ -355,7 +355,6 @@ evaluatePackageBodyWith perModule perTerm body
|
||||
. fmap (Subterm <*> evalTerm)
|
||||
$ m
|
||||
handleEvalClosures = raiseHandler (relay pure (\ (EvalClosure term) yield -> lower (evalTerm term) >>= yield))
|
||||
evalTerm :: term -> Evaluator location term value moduleEffects value
|
||||
evalTerm
|
||||
= handleEvalClosures
|
||||
. foldSubterms (perTerm eval)
|
||||
|
Loading…
Reference in New Issue
Block a user