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

Extract variable

Browse Source
This commit is contained in:
Jeroen Engels 2021-10-27 17:19:38 +02:00
parent bc22c438e8
commit 6f206f8392
1 changed files with 11 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
src/Review/Rule.elm
View File

@ -1324,17 +1324,21 @@ fromModuleRuleSchemaToRunnableModuleVisitor (ModuleRuleSchema schema) =
(visitDeclaration
(List.reverse schema.declarationVisitorsOnEnter)
schema.declarationVisitorsOnExit
{ expressionVisitorsOnEnter = List.reverse schema.expressionVisitorsOnEnter
, expressionVisitorsOnExit = schema.expressionVisitorsOnExit
, letDeclarationVisitorsOnEnter = List.reverse schema.letDeclarationVisitorsOnEnter
, letDeclarationVisitorsOnExit = schema.letDeclarationVisitorsOnExit
, caseBranchVisitorsOnEnter = List.reverse schema.caseBranchVisitorsOnEnter
, caseBranchVisitorsOnExit = schema.caseBranchVisitorsOnExit
}
expressionVisitorRecord
)
else
\_ errorsAndContext -> errorsAndContext
expressionVisitorRecord : ExpressionRelatedVisitors moduleContext
expressionVisitorRecord =
{ expressionVisitorsOnEnter = List.reverse schema.expressionVisitorsOnEnter
, expressionVisitorsOnExit = schema.expressionVisitorsOnExit
, letDeclarationVisitorsOnEnter = List.reverse schema.letDeclarationVisitorsOnEnter
, letDeclarationVisitorsOnExit = schema.letDeclarationVisitorsOnExit
, caseBranchVisitorsOnEnter = List.reverse schema.caseBranchVisitorsOnEnter
, caseBranchVisitorsOnExit = schema.caseBranchVisitorsOnExit
}
in
{ moduleDefinitionVisitors = List.reverse schema.moduleDefinitionVisitors
, commentsVisitors = List.reverse schema.commentsVisitors