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 parameters

Browse Source
This commit is contained in:
Jeroen Engels 2022-09-17 18:28:04 +02:00
parent 65cf7e8f01
commit 36df458899
1 changed files with 12 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
src/Review/Rule.elm
View File

@ -6295,7 +6295,7 @@ scope_declarationEnterVisitor node context =
let
newScope : Scope
newScope =
{ emptyScope | names = parameters <| .arguments <| Node.value function.declaration }
{ emptyScope | names = parameters (Node.value function.declaration).arguments }
newContext : ScopeModuleContext
newContext =
@ -6374,16 +6374,17 @@ scope_declarationExitVisitor node context =
parameters : List (Node Pattern) -> Dict String VariableInfo
parameters patterns =
ListExtra.fastConcatMap collectNamesFromPattern patterns
|> List.map
(\node ->
( Node.value node
, { node = node
, variableType = FunctionParameter
}
)
)
|> Dict.fromList
List.foldl
(\node acc ->
Dict.insert
(Node.value node)
{ node = node
, variableType = FunctionParameter
}
acc
)
Dict.empty
(ListExtra.orderIndependentConcatMap collectNamesFromPattern patterns)
collectNamesFromPattern : Node Pattern -> List (Node String)