Extract Wasm types for alloc function

1 files changed, 4 insertions, 2 deletions

diff --git a/src/main/java/org/shedlang/compiler/backends/wasm/PatioToWasm.java b/src/main/java/org/shedlang/compiler/backends/wasm/PatioToWasm.java
index 31c44cae..eca300a6 100644
--- a/src/main/java/org/shedlang/compiler/backends/wasm/PatioToWasm.java
+++ b/src/main/java/org/shedlang/compiler/backends/wasm/PatioToWasm.java
@@ -23,6 +23,8 @@ import java.util.List;
 public class PatioToWasm {
     public static final String ALLOC_NAME = "shed__runtime__gc_alloc";
     public static final String STACK_ALLOC_NAME = "malloc";
+    private static final WasmValueType TYPE_SIZE_T = WasmValueType.I32;
+    private static final WasmValueType TYPE_DATA_POINTER = WasmValueType.I32;
 
     public static WasmModule generateCompilationUnit(
         PatioCompilationUnit patioCompilationUnit,
@@ -34,8 +36,8 @@ public class PatioToWasm {
             new WasmImportDescriptor.Func(
                 ALLOC_NAME,
                 new WasmFuncType(
-                    List.of(WasmValueType.I32, WasmValueType.I32, WasmValueType.I32),
-                    List.of(WasmValueType.I32)
+                    List.of(TYPE_SIZE_T, TYPE_SIZE_T, TYPE_SIZE_T),
+                    List.of(TYPE_DATA_POINTER)
                 )
             )
         ));