From bf41d022ce9736a92097f416ab96fca7ab4594ca Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Sun, 23 Aug 2026 14:05:26 +0200 Subject: Reject 0-sized variables --- testsuite/compilable/opaque_type.elna | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 testsuite/compilable/opaque_type.elna (limited to 'testsuite/compilable/opaque_type.elna') diff --git a/testsuite/compilable/opaque_type.elna b/testsuite/compilable/opaque_type.elna new file mode 100644 index 0000000..b46cf68 --- /dev/null +++ b/testsuite/compilable/opaque_type.elna @@ -0,0 +1,14 @@ +type + Handle = extern + Alias = Handle + +var + handle: ^Handle := nil + alias: ^Alias + +proc take(h: ^Handle): ^Handle +return h + +begin + alias := take(handle) +end. -- cgit v1.2.3