瀏覽代碼

+ simple test for WasmExternRef

Nikolay Nikolov 2 年之前
父節點
當前提交
65b175cebd
共有 1 個文件被更改,包括 29 次插入0 次删除
  1. 29 0
      tests/test/wasm/twasmexternref1.pp

+ 29 - 0
tests/test/wasm/twasmexternref1.pp

@@ -0,0 +1,29 @@
+{ %cpu=wasm32 }
+{ %norun }
+
+program twasmexternref1;
+
+procedure testproc;
+var
+  p: WasmExternRef;
+begin
+end;
+
+procedure testproc2(q: WasmExternRef);
+begin
+end;
+
+function testproc3: WasmExternRef;
+begin
+end;
+
+function testproc4(a, b, c: longint; d: WasmExternRef; e: int64): WasmExternRef;
+var
+  q: WasmExternRef;
+begin
+  q := d;
+  testproc4 := q;
+end;
+
+begin
+end.