1
1
mirror of https://github.com/github/semantic.git synced 2024-12-20 05:11:44 +03:00

🔥 a redundant location rule.

This commit is contained in:
Rob Rix 2017-08-14 12:05:08 -04:00
parent 9d5c5baab1
commit 512a297142

View File

@ -383,7 +383,7 @@ import' = makeTerm <$> symbol ImportStatement <*> children (Declaration.Import
<|> makeTerm <$> symbol WildcardImport <*> (Syntax.Identifier <$> source) <|> makeTerm <$> symbol WildcardImport <*> (Syntax.Identifier <$> source)
assertStatement :: Assignment assertStatement :: Assignment
assertStatement = makeTerm <$ symbol AssertStatement <*> location <*> children (Expression.Call <$> (makeTerm <$> symbol AnonAssert <*> (Syntax.Identifier <$> source)) <*> many expression <*> emptyTerm) assertStatement = makeTerm <$> symbol AssertStatement <*> children (Expression.Call <$> (makeTerm <$> symbol AnonAssert <*> (Syntax.Identifier <$> source)) <*> many expression <*> emptyTerm)
printStatement :: Assignment printStatement :: Assignment
printStatement = do printStatement = do