Browse Source

+ simple test for WasmExternRef

Nikolay Nikolov 2 years ago
parent
commit
65b175cebd
1 changed files with 29 additions and 0 deletions
  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.