Parse less than or equal expressions

2 files changed, 20 insertions, 1 deletions

diff --git a/src/test/java/org/shedlang/compiler/ast/untyped/UntypedNodeMatchers.java b/src/test/java/org/shedlang/compiler/ast/untyped/UntypedNodeMatchers.java
index 71c518b2..77e25dff 100644
--- a/src/test/java/org/shedlang/compiler/ast/untyped/UntypedNodeMatchers.java
+++ b/src/test/java/org/shedlang/compiler/ast/untyped/UntypedNodeMatchers.java
@@ -221,6 +221,13 @@ public class UntypedNodeMatchers {
         return isUntypedBinaryOperationNode(UntypedBinaryOperator.LESS_THAN, left, right);
     }
 
+    public static Matcher<UntypedExpressionNode> isUntypedLessThanOrEqualNode(
+        Matcher<UntypedExpressionNode> left,
+        Matcher<UntypedExpressionNode> right
+    ) {
+        return isUntypedBinaryOperationNode(UntypedBinaryOperator.LESS_THAN_OR_EQUAL, left, right);
+    }
+
     public static Matcher<UntypedExpressionNode> isUntypedMemberAccessNode(
         Matcher<UntypedExpressionNode> receiver,
         String memberName
diff --git a/src/test/java/org/shedlang/compiler/parser/ParserLessThanTests.java b/src/test/java/org/shedlang/compiler/parser/ParserRelationalOperationTests.java
index 7d87b162..70d81280 100644
--- a/src/test/java/org/shedlang/compiler/parser/ParserLessThanTests.java
+++ b/src/test/java/org/shedlang/compiler/parser/ParserRelationalOperationTests.java
@@ -6,7 +6,7 @@ import static org.shedlang.compiler.ast.untyped.UntypedNodeMatchers.*;
 import static org.shedlang.compiler.parser.ParserTesting.parseString;
 import static org.zwobble.precisely.AssertThat.assertThat;
 
-public class ParserLessThanTests {
+public class ParserRelationalOperationTests {
     @Test
     public void canParseLessThanExpression() {
         var source = "1 < 2";
@@ -18,4 +18,16 @@ public class ParserLessThanTests {
             isUntypedIntLiteralNode(2)
         ));
     }
+
+    @Test
+    public void canParseLessThanOrEqualExpression() {
+        var source = "1 <= 2";
+
+        var node = parseString(source, Parser::parseTopLevelExpression);
+
+        assertThat(node, isUntypedLessThanOrEqualNode(
+            isUntypedIntLiteralNode(1),
+            isUntypedIntLiteralNode(2)
+        ));
+    }
 }