From 92e88cfcb2b6b8258f68945a0be8846cffa72c6a Mon Sep 17 00:00:00 2001 From: Eugen Wissner Date: Thu, 7 May 2026 07:57:16 +0200 Subject: Implement aggregate values assignment --- Rakefile | 17 +++++++++++------ 1 file changed, 11 insertions(+), 6 deletions(-) (limited to 'Rakefile') diff --git a/Rakefile b/Rakefile index c48a248..8b18106 100644 --- a/Rakefile +++ b/Rakefile @@ -46,13 +46,18 @@ task :convert do current_stage << <<~FUN proc f(); var - x: ElnaType; - y: ElnaTypeField; + x: ElnaLocation; + y: ElnaPosition; begin - x.size := 3; - y.field_type := malloc(#size(ElnaType)); - y.field_type^ := x; - printf("# %i\\n\\0", y.field_type^.size) + x.line := 5; + x.column := 3; + y.end_location := x; + + (* y.end_location.line := 5; + y.end_location.column := 3; + x := y.end_location; *) + + printf("# %i %i %i %i\\n\\0", x.line, x.column, y.end_location.line, y.end_location.column) end; begin -- cgit v1.2.3