github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-27 08:54:14 +03:00
Code Issues Projects Releases Wiki Activity

Simplify unaryOperator assignment

Browse Source
This commit is contained in:
Rick Winfrey 2017-05-16 16:43:35 -07:00
parent d44db9724e
commit d7bd9c9b08
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/Language/Python/Syntax.hs
View File

@ -58,9 +58,10 @@ expression :: HasCallStack => Assignment (Node Grammar) (Term Syntax Location)
expression = identifier <|> statement <|> unaryOperator <|> tuple <|> literal
unaryOperator :: HasCallStack => Assignment (Node Grammar) (Term Syntax Location)
unaryOperator = makeTerm <$> symbol UnaryOperator <*> children ( Expression.UCompliment <$> (symbol AnonTilde *> integer)
<|> Expression.UMinus <$> (symbol AnonMinus *> integer)
<|> Expression.UPlus <$> (symbol AnonPlus *> integer))
unaryOperator = makeTerm <$> symbol UnaryOperator <*> children ( Expression.UCompliment <$> (symbol AnonTilde *> expression)
<|> Expression.UMinus <$> (symbol AnonMinus *> expression)
<|> Expression.UPlus <$> (symbol AnonPlus *> expression))
identifier :: HasCallStack => Assignment (Node Grammar) (Term Syntax Location)
identifier = makeTerm <$> symbol Identifier <*> (Syntax.Identifier <$> source)