1
1
mirror of https://github.com/github/semantic.git synced 2024-12-01 00:33:59 +03:00

Get a la carte to match precise here

This commit is contained in:
Timothy Clem 2020-01-15 09:26:19 -08:00
parent 6c773b546f
commit c19c67c8d7

View File

@ -248,7 +248,7 @@ method = makeTerm <$> symbol Method <*> (withNewScope . children) (Declaration.M
expressions' = makeTerm <$> location <*> many expression
singletonMethod :: Assignment (Term Loc)
singletonMethod = makeTerm <$> symbol SingletonMethod <*> (withNewScope . children) (Declaration.Method [] <$> expression <*> methodSelector <*> params <*> expressions <*> pure publicAccessControl)
singletonMethod = makeTerm <$> symbol SingletonMethod <*> (withExtendedScope . children) (Declaration.Method [] <$> expression <*> methodSelector <*> params <*> expressions <*> pure publicAccessControl)
where params = symbol MethodParameters *> children (many parameter) <|> pure []
lambda :: Assignment (Term Loc)