From 65b175cebdc0b69f7b6ab1449622f944588e8214 Mon Sep 17 00:00:00 2001 From: Nikolay Nikolov Date: Sun, 11 Jun 2023 03:35:25 +0300 Subject: [PATCH] + simple test for WasmExternRef --- tests/test/wasm/twasmexternref1.pp | 29 +++++++++++++++++++++++++++++ 1 file changed, 29 insertions(+) create mode 100644 tests/test/wasm/twasmexternref1.pp diff --git a/tests/test/wasm/twasmexternref1.pp b/tests/test/wasm/twasmexternref1.pp new file mode 100644 index 0000000000..fc5c09438e --- /dev/null +++ b/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.