mirror of
https://github.com/jfmengels/elm-review.git
synced 2024-12-24 10:14:04 +03:00
Add visitOnlyExpressions
This commit is contained in:
parent
50d26f3314
commit
6fade9f954
@ -4478,6 +4478,18 @@ visitExpression expressionRelatedVisitors node moduleContext =
|
||||
|> visitWithListOfVisitors expressionRelatedVisitors.expressionVisitorsOnExit node
|
||||
|
||||
|
||||
visitOnlyExpressions :
|
||||
ExpressionRelatedVisitors moduleContext
|
||||
-> Node Expression
|
||||
-> moduleContext
|
||||
-> ( List (Error {}), moduleContext )
|
||||
visitOnlyExpressions expressionRelatedVisitors node moduleContext =
|
||||
( [], moduleContext )
|
||||
|> visitWithListOfVisitors expressionRelatedVisitors.expressionVisitorsOnEnter node
|
||||
|> accumulateList (visitOnlyExpressions expressionRelatedVisitors) (expressionChildren node)
|
||||
|> visitWithListOfVisitors expressionRelatedVisitors.expressionVisitorsOnExit node
|
||||
|
||||
|
||||
visitLetDeclaration :
|
||||
ExpressionRelatedVisitors moduleContext
|
||||
-> Node Expression.LetBlock
|
||||
|
Loading…
Reference in New Issue
Block a user