Implement 1 byte variable operations
This commit is contained in:
@@ -46,11 +46,9 @@ task :convert do
|
|||||||
current_stage << <<~FUN
|
current_stage << <<~FUN
|
||||||
proc f();
|
proc f();
|
||||||
var
|
var
|
||||||
x: ^ElnaLocation;
|
x: ElnaRtlObjectInfo;
|
||||||
begin
|
begin
|
||||||
x := malloc(#size(ElnaLocation));
|
x.allocated := true
|
||||||
x^.line := 5;
|
|
||||||
x^.column := cast(3: Word)
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
begin
|
begin
|
||||||
@@ -60,6 +58,8 @@ task :convert do
|
|||||||
current_stage << <<~FUN
|
current_stage << <<~FUN
|
||||||
var
|
var
|
||||||
FUN
|
FUN
|
||||||
|
elsif line.end_with?("allocated: Word\n")
|
||||||
|
current_stage << "\t\tallocated: Bool\n"
|
||||||
else
|
else
|
||||||
current_stage << line
|
current_stage << line
|
||||||
end
|
end
|
||||||
|
|||||||
+358
-241
File diff suppressed because it is too large
Load Diff
Reference in New Issue
Block a user