mirror of
https://github.com/github/semantic.git
synced 2024-12-30 10:27:45 +03:00
Assign comments in decorator definitions
This commit is contained in:
parent
1d56e79950
commit
61a34fe866
@ -200,7 +200,7 @@ decoratedDefinition = symbol DecoratedDefinition *> children (makeDecorator <$>
|
|||||||
where
|
where
|
||||||
makeDecorator (loc, partialDecorator') next = makeTerm loc (partialDecorator' next)
|
makeDecorator (loc, partialDecorator') next = makeTerm loc (partialDecorator' next)
|
||||||
partialDecorator = (,) <$> symbol Decorator <*> children decorator'
|
partialDecorator = (,) <$> symbol Decorator <*> children decorator'
|
||||||
decorator' = Declaration.Decorator <$> expression <*> ((symbol ArgumentList *> children (many expression <|> many emptyTerm)) <|> many emptyTerm)
|
decorator' = Declaration.Decorator <$> expression <*> ((<>) <$ symbol ArgumentList <*> children (many expression) <*> many comment <|> many comment)
|
||||||
|
|
||||||
withStatement :: Assignment
|
withStatement :: Assignment
|
||||||
withStatement = symbol WithStatement >>= \ loc -> children (mk loc <$> some with)
|
withStatement = symbol WithStatement >>= \ loc -> children (mk loc <$> some with)
|
||||||
|
Loading…
Reference in New Issue
Block a user