mirror of
https://github.com/github/semantic.git
synced 2024-12-26 00:12:29 +03:00
🔥 NBSP
This commit is contained in:
parent
67823c7be7
commit
ea02ff5a92
@ -278,7 +278,7 @@ comparisonOperator = symbol ComparisonOperator *> children (expression `chainl1T
|
|||||||
, (makeTerm1 .) . Expression.Member <$ symbol AnonIn
|
, (makeTerm1 .) . Expression.Member <$ symbol AnonIn
|
||||||
, token AnonIs *> ((makeTerm1 .) . invert Expression.Equal <$ symbol AnonNot <|> pure ((makeTerm1 .) . Expression.Equal))
|
, token AnonIs *> ((makeTerm1 .) . invert Expression.Equal <$ symbol AnonNot <|> pure ((makeTerm1 .) . Expression.Equal))
|
||||||
])
|
])
|
||||||
where invert cons a b = Expression.Not (makeTerm1 (cons a b))
|
where invert cons a b = Expression.Not (makeTerm1 (cons a b))
|
||||||
|
|
||||||
notOperator :: Assignment
|
notOperator :: Assignment
|
||||||
notOperator = makeTerm <$> symbol NotOperator <*> children (Expression.Not <$> term expression)
|
notOperator = makeTerm <$> symbol NotOperator <*> children (Expression.Not <$> term expression)
|
||||||
|
Loading…
Reference in New Issue
Block a user