summaryrefslogtreecommitdiff
path: root/parser.hs
diff options
context:
space:
mode:
authortomsmeding <tom.smeding@gmail.com>2017-01-30 09:34:05 +0100
committertomsmeding <tom.smeding@gmail.com>2017-01-30 09:34:05 +0100
commit9b71b9206cd6854877262de2aa1c76421aa899be (patch)
tree0669bcea396f97ab5456051b6a695f994ad330b5 /parser.hs
parent1cb1af774cdf0bd8c3f8da257c789184d349bc8c (diff)
Implement >= and <=
Diffstat (limited to 'parser.hs')
-rw-r--r--parser.hs8
1 files changed, 4 insertions, 4 deletions
diff --git a/parser.hs b/parser.hs
index 81cbbd3..211c044 100644
--- a/parser.hs
+++ b/parser.hs
@@ -86,10 +86,10 @@ exprTable =
binary "%" Modulo E.AssocLeft],
[binary "+" Plus E.AssocLeft,
binary "-" Minus E.AssocLeft],
- [binary ">" Greater E.AssocNone,
- binary "<" Less E.AssocNone,
- binary ">=" GEqual E.AssocNone,
- binary "<=" LEqual E.AssocNone],
+ [binary ">=" GEqual E.AssocNone,
+ binary "<=" LEqual E.AssocNone,
+ binary ">" Greater E.AssocNone,
+ binary "<" Less E.AssocNone],
[binary "==" Equal E.AssocNone,
binary "!=" Unequal E.AssocNone],
[binary "&&" BoolAnd E.AssocLeft,