mirror of
https://github.com/jfmengels/elm-review.git
synced 2024-12-23 17:53:35 +03:00
Extract variable
This commit is contained in:
parent
bc22c438e8
commit
6f206f8392
@ -1324,6 +1324,14 @@ fromModuleRuleSchemaToRunnableModuleVisitor (ModuleRuleSchema schema) =
|
||||
(visitDeclaration
|
||||
(List.reverse schema.declarationVisitorsOnEnter)
|
||||
schema.declarationVisitorsOnExit
|
||||
expressionVisitorRecord
|
||||
)
|
||||
|
||||
else
|
||||
\_ errorsAndContext -> errorsAndContext
|
||||
|
||||
expressionVisitorRecord : ExpressionRelatedVisitors moduleContext
|
||||
expressionVisitorRecord =
|
||||
{ expressionVisitorsOnEnter = List.reverse schema.expressionVisitorsOnEnter
|
||||
, expressionVisitorsOnExit = schema.expressionVisitorsOnExit
|
||||
, letDeclarationVisitorsOnEnter = List.reverse schema.letDeclarationVisitorsOnEnter
|
||||
@ -1331,10 +1339,6 @@ fromModuleRuleSchemaToRunnableModuleVisitor (ModuleRuleSchema schema) =
|
||||
, caseBranchVisitorsOnEnter = List.reverse schema.caseBranchVisitorsOnEnter
|
||||
, caseBranchVisitorsOnExit = schema.caseBranchVisitorsOnExit
|
||||
}
|
||||
)
|
||||
|
||||
else
|
||||
\_ errorsAndContext -> errorsAndContext
|
||||
in
|
||||
{ moduleDefinitionVisitors = List.reverse schema.moduleDefinitionVisitors
|
||||
, commentsVisitors = List.reverse schema.commentsVisitors
|
||||
|
Loading…
Reference in New Issue
Block a user