1
1
mirror of https://github.com/github/semantic.git synced 2024-12-29 18:06:14 +03:00

Consume a TypeIdentifier

Co-Authored-By: Ayman Nadeem <aymannadeem@gmail.com>
This commit is contained in:
joshvera 2018-07-20 15:19:35 -04:00
parent c9c7e43078
commit 4ffe88e4b9

View File

@ -288,7 +288,7 @@ identifier :: Assignment Term
identifier = makeTerm <$> (symbol Identifier) <*> (Syntax.Identifier . name <$> source)
typeIdentifier :: Assignment Term
typeIdentifier = makeTerm <$> (symbol Identifier) <*> (Syntax.Identifier . name <$> source)
typeIdentifier = makeTerm <$> symbol TypeIdentifier <*> (Syntax.Identifier . name <$> source)
identifier' :: Assignment Name
identifier' = (symbol Identifier <|> symbol TypeIdentifier <|> symbol Identifier') *> (name <$> source)