From 44a0c221d51c9aa036b47b218a6caea4424f5996 Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Fri, 17 Jul 2026 13:49:20 +0200 Subject: Handle const Pointer as const pointer to const data --- testsuite/compilable/const_pointer_conversion.elna | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 testsuite/compilable/const_pointer_conversion.elna (limited to 'testsuite/compilable/const_pointer_conversion.elna') diff --git a/testsuite/compilable/const_pointer_conversion.elna b/testsuite/compilable/const_pointer_conversion.elna new file mode 100644 index 0000000..003fbea --- /dev/null +++ b/testsuite/compilable/const_pointer_conversion.elna @@ -0,0 +1,14 @@ +var + x: Int + c: const Int + p: ^Int + pc: ^const Int + v: Pointer + cv: const Pointer := nil + cv2: const Pointer := @x + cv3: const Pointer := @c + +begin + v := p; + v := @x +end. -- cgit v1.2.3