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 scope_declarationEnterVisitor

Browse Source
This commit is contained in:
Jeroen Engels 2022-09-17 16:42:42 +02:00
parent e519b2b775
commit 5e4665dcbd
1 changed files with 8 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
src/Review/Rule.elm
View File

@ -6329,7 +6329,13 @@ scope_declarationEnterVisitor node context =
{ context
| lookupTable =
ModuleNameLookupTableInternal.addMultiple
(constructors |> ListExtra.orderIndependentConcatMap (Node.value >> .arguments) |> ListExtra.orderIndependentConcatMap (collectModuleNamesFromTypeAnnotation context))
(List.foldl
(\(Node _ constructor) acc ->
collectModuleNamesFromTypeAnnotationHelp context constructor.arguments acc
)
[]
constructors
)
context.lookupTable
}
@ -6343,14 +6349,10 @@ scope_declarationEnterVisitor node context =
Declaration.PortDeclaration signature ->
let
moduleNamesFromSignature : List ( Range, ModuleName )
moduleNamesFromSignature =
collectModuleNamesFromTypeAnnotation context signature.typeAnnotation
lookupTable : ModuleNameLookupTable
lookupTable =
ModuleNameLookupTableInternal.addMultiple
moduleNamesFromSignature
(collectModuleNamesFromTypeAnnotation context signature.typeAnnotation)
context.lookupTable
in
{ context | lookupTable = lookupTable }