From 1886fc2b214bb2c5bfc4cb1ca3d49975c76da0d6 Mon Sep 17 00:00:00 2001
From: Michael Williamson <mike@zwobble.org>
Date: Sat, 23 Dec 2023 12:05:34 +0000
Subject: Parse constructed types

---
 .../shedlang/compiler/ast/untyped/UntypedNodeMatchers.java    | 11 +++++++++++
 1 file changed, 11 insertions(+)

(limited to 'src/test/java/org/shedlang/compiler/ast')

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 5b290949..7ad42734 100644
--- a/src/test/java/org/shedlang/compiler/ast/untyped/UntypedNodeMatchers.java
+++ b/src/test/java/org/shedlang/compiler/ast/untyped/UntypedNodeMatchers.java
@@ -93,6 +93,17 @@ public class UntypedNodeMatchers {
         );
     }
 
+    public static Matcher<UntypedTypeLevelExpressionNode> isUntypedConstructedTypeNode(
+        Matcher<UntypedTypeLevelExpressionNode> receiver,
+        Matcher<Iterable<? extends UntypedTypeLevelExpressionNode>> args
+    ) {
+        return instanceOf(
+            UntypedConstructedTypeNode.class,
+            has("receiver", x -> x.receiver(), receiver),
+            has("args", x -> x.args(), args)
+        );
+    }
+
     public static UntypedEffectDefinitionNodeMatcher isUntypedEffectDefinitionNode() {
         return UntypedEffectDefinitionNodeMatcher.empty();
     }
-- 
cgit v1.2.3