diff options
| -rw-r--r-- | src/Parser/Expr.hs | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/src/Parser/Expr.hs b/src/Parser/Expr.hs index 835c58d..f9b1e32 100644 --- a/src/Parser/Expr.hs +++ b/src/Parser/Expr.hs @@ -245,6 +245,22 @@ someExpr = join inner <?> "expression" , SomeBinOp ((/=) @Scientific) , SomeBinOp ((/=) @Text) ] + , binary ">" $ + [ SomeBinOp ((>) @Integer) + , SomeBinOp ((>) @Scientific) + ] + , binary ">=" $ + [ SomeBinOp ((>=) @Integer) + , SomeBinOp ((>=) @Scientific) + ] + , binary "<=" $ + [ SomeBinOp ((<=) @Integer) + , SomeBinOp ((<=) @Scientific) + ] + , binary "<" $ + [ SomeBinOp ((<) @Integer) + , SomeBinOp ((<) @Scientific) + ] ] ] |