on master help sign in
enable parsing of relational NotEquals

relates to #270

commitf7fc88861d352a97cf2cbb477c02a2be18cce335 authorAgentM <agentm@themactionfaction.com> dateFri 6 Nov 2020, 22:55 (6 years ago) parent28f5d1e
1 file changed+2−1
src/bin/TutorialD/Interpreter/RelationalExpr.hs+2−1
src/bin/TutorialD/Interpreter/RelationalExpr.hs+2−1
@@ -129,7 +129,8 @@ relOperators = [
129129 [InfixL antijoinP],
130130 [InfixL (reservedOp "union" >> return Union)],
131131 [InfixL (reservedOp "minus" >> return Difference)],
132− [InfixN (reservedOp "=" >> return Equals)],
132+ [InfixN (reservedOp "=" >> return Equals),
133+ InfixN (reservedOp "/=" >> return NotEquals)],
133134 [Postfix extendP]
134135 ]
135136