mirror of
https://github.com/github/semantic.git
synced 2024-12-22 14:21:31 +03:00
🔥 expressionStatements.
This commit is contained in:
parent
6792cfe1f9
commit
913532a762
@ -135,12 +135,6 @@ termConstructor source sourceSpan info = cofree . construct
|
||||
construct children =
|
||||
withDefaultInfo $ S.Indexed children
|
||||
|
||||
expressionStatements :: HasField fields Category => Term Text (Record fields) -> [Term Text (Record fields)]
|
||||
expressionStatements exprs |
|
||||
Other "statement_block" == category (extract exprs),
|
||||
S.Indexed exprs' <- unwrap exprs = exprs'
|
||||
expressionStatements _ = mempty
|
||||
|
||||
methodDefinitions :: HasField fields Category => Term Text (Record fields) -> [Term Text (Record fields)]
|
||||
methodDefinitions definitions |
|
||||
Other "class_body" == category (extract definitions),
|
||||
|
Loading…
Reference in New Issue
Block a user