Apple-2gs-SW/ORCA-C
1
0
Fork 0
mirror of https://github.com/byteworksinc/ORCA-C.git synced 2025-08-14 16:27:34 +00:00
Code Issues Projects Releases Wiki Activity

Count variables referenced in assembly code as used.

Browse Source
This commit is contained in:
Stephen Heumann
2022-12-13 19:04:18 -06:00
parent 4bc486eade
commit 705c9d36a2
1 changed files with 1 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
Asm.pas
View File

@@ -224,6 +224,7 @@ var
size := longAddress; size := longAddress;
end {if} end {if}
else begin else begin
id^.used := true;
operand.symbolPtr := id; operand.symbolPtr := id;
if id^.storage in [stackFrame,parameter] then begin if id^.storage in [stackFrame,parameter] then begin
code^.slab := id^.lln; code^.slab := id^.lln;