1
1
mirror of https://github.com/github/semantic.git synced 2024-12-21 13:51:44 +03:00

s/Unary/UnaryExpression

This commit is contained in:
joshvera 2017-08-21 19:16:53 -04:00
parent 51f69aded8
commit ed9895f422

View File

@ -912,7 +912,7 @@ assignment'
<|> argument <|> argument
unary :: Assignment unary :: Assignment
unary = symbol Unary >>= \ location -> unary = symbol UnaryExpression >>= \ location ->
makeTerm location . Expression.Complement <$> children ( symbol AnonTilde *> expression ) makeTerm location . Expression.Complement <$> children ( symbol AnonTilde *> expression )
<|> makeTerm location . Expression.Not <$> children ( symbol AnonBang *> expression ) <|> makeTerm location . Expression.Not <$> children ( symbol AnonBang *> expression )
<|> makeTerm location . Expression.Not <$> children ( symbol AnonNot *> expression ) <|> makeTerm location . Expression.Not <$> children ( symbol AnonNot *> expression )