git.iko.soy/project-m36
on master help sign in
enable parsing of relational NotEquals
f7fc888AgentM
src/bin/TutorialD/Interpreter/RelationalExpr.hs+2−1
compare with master
unifiedsplit
@@ -129,7 +129,8 @@ relOperators = [
129 [InfixL antijoinP],
129 [InfixL antijoinP],
130 [InfixL (reservedOp "union" >> return Union)],
130 [InfixL (reservedOp "union" >> return Union)],
131 [InfixL (reservedOp "minus" >> return Difference)],
131 [InfixL (reservedOp "minus" >> return Difference)],
132− [InfixN (reservedOp "=" >> return Equals)],
132+ [InfixN (reservedOp "=" >> return Equals),
133+ InfixN (reservedOp "/=" >> return NotEquals)],
133 [Postfix extendP]
134 [Postfix extendP]
134 ]
135 ]
135
136