jfmengels/elm-review
1
1
Fork 0
mirror of https://github.com/jfmengels/elm-review.git synced 2024-12-23 01:32:05 +03:00
Code Issues Packages Projects Releases Wiki Activity

Speed up final evaluations

Browse Source
This commit is contained in:
Jeroen Engels 2022-09-17 18:21:16 +02:00
parent 4d60f6e61c
commit dc417cb770
1 changed files with 4 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/Review/Rule.elm
View File

@ -4912,11 +4912,9 @@ visitCaseBranch expressionRelatedVisitors caseBlockWithRange (( _, caseExpressio
-}
makeFinalEvaluation : List (context -> List (Error {})) -> ( List (Error {}), context ) -> List (Error {})
makeFinalEvaluation finalEvaluationFns ( previousErrors, context ) =
ListExtra.orderIndependentAppend
(ListExtra.fastConcatMap
(\visitor -> visitor context)
finalEvaluationFns
)
ListExtra.orderIndependentConcatMapAppend
(\visitor -> visitor context)
finalEvaluationFns
previousErrors
@ -5023,7 +5021,7 @@ errorsFromFinalEvaluationForProject projectVisitor initialContext contextsPerMod
Nothing ->
initialContext
in
ListExtra.fastConcatMap
ListExtra.orderIndependentConcatMap
(\finalEvaluationFn -> finalEvaluationFn finalContext)
projectVisitor.finalEvaluationFns