From d75f1c798a226861297a18da9a5afaa756e1ba91 Mon Sep 17 00:00:00 2001
From: Michael Williamson <mike@zwobble.org>
Date: Sun, 2 Mar 2025 19:38:21 +0000
Subject: Add test for native type methods with params

---
 .../TypeCheckerNativeTypeDeclarationTests.java     | 56 ++++++++++++++++++++++
 1 file changed, 56 insertions(+)

(limited to 'src/test/java')

diff --git a/src/test/java/org/shedlang/compiler/typechecker/TypeCheckerNativeTypeDeclarationTests.java b/src/test/java/org/shedlang/compiler/typechecker/TypeCheckerNativeTypeDeclarationTests.java
index a02262a4..029fc034 100644
--- a/src/test/java/org/shedlang/compiler/typechecker/TypeCheckerNativeTypeDeclarationTests.java
+++ b/src/test/java/org/shedlang/compiler/typechecker/TypeCheckerNativeTypeDeclarationTests.java
@@ -172,4 +172,60 @@ public class TypeCheckerNativeTypeDeclarationTests {
             ))
         );
     }
+
+    @Test
+    public void canTypeCheckMethodWithMultipleParams() {
+        var untyped = UntypedNativeTypeDeclarationNode.builder()
+            .withName("ExampleType")
+            .addMethod(
+                UntypedNativeFunctionDeclarationNode.builder()
+                    .addPositionalParam(Untyped.typeLevelReference("This"))
+                    .addPositionalParam(Untyped.typeLevelReference("Bool"))
+                    .addNamedParam("b", Untyped.typeLevelReference("Int"))
+                    .withName("a")
+                    .withReturnType(Untyped.typeLevelReference("Unit"))
+                    .build()
+            )
+            .build();
+        var context = TypeCheckerContext.EMPTY
+            .enterGlobal(P.map(
+                Map.entry("Unit", Types.metaType(Types.UNIT)),
+                Map.entry("Bool", Types.metaType(Types.BOOL)),
+                Map.entry("Int", Types.metaType(Types.INT))
+            ));
+
+        var typed = typeCheckNamespaceStatement(untyped, context);
+
+        assertThat(
+            typed.value(),
+            isTypedNativeTypeDeclarationNode()
+                .withMethods(isSequence(
+                    isTypedNativeFunctionDeclarationNode()
+                        .withSignature(
+                            FunctionType.builder()
+                                .addPositionalParam(Types.nativeType(NAMESPACE_NAME, "ExampleType"))
+                                .addPositionalParam(Types.BOOL)
+                                .addNamedParam("b", Types.INT)
+                                .withReturnType(Types.UNIT)
+                                .build()
+                        )
+                ))
+        );
+        var nativeTypeInfo = typed.context().toTypeInfos()
+            .nativeTypeInfo(Types.nativeType(NAMESPACE_NAME, "ExampleType"))
+            .orElseThrow();
+        assertThat(
+            nativeTypeInfo,
+            has("methods", x -> x.methods(), isSequence(
+                equalTo(new MethodInfo(
+                    "a",
+                    FunctionType.builder()
+                        .addPositionalParam(Types.BOOL)
+                        .addNamedParam("b", Types.INT)
+                        .withReturnType(Types.UNIT)
+                        .build()
+                ))
+            ))
+        );
+    }
 }
-- 
cgit v1.2.3