paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-13 11:59:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Local var templist renamed localslist. No functional changes.

Browse Source
This commit is contained in:
Nikolay Nikolov 2023-10-18 01:41:25 +03:00
parent edabca1447
commit db23f54f8c
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
compiler/wasm32/cpupi.pas
View File

@ -651,7 +651,7 @@ implementation
end; end;
var var
templist: TAsmList; localslist: TAsmList;
l : TWasmLocal; l : TWasmLocal;
first, labels_resolved: Boolean; first, labels_resolved: Boolean;
local: tai_local; local: tai_local;
@ -659,7 +659,7 @@ implementation
begin begin
first_tai_functype:=findfirst_tai_functype(aktproccode); first_tai_functype:=findfirst_tai_functype(aktproccode);
templist:=TAsmList.create; localslist:=TAsmList.create;
local:=nil; local:=nil;
first:=true; first:=true;
l:=ttgwasm(tg).localvars.first; l:=ttgwasm(tg).localvars.first;
@ -669,14 +669,14 @@ implementation
local:=tai_local.create(l.typ); local:=tai_local.create(l.typ);
local.first:=first; local.first:=first;
first:=false; first:=false;
templist.Concat(local); localslist.Concat(local);
l:=l.nextseq; l:=l.nextseq;
Inc(FFirstFreeLocal); Inc(FFirstFreeLocal);
end; end;
if assigned(local) then if assigned(local) then
local.last:=true; local.last:=true;
aktproccode.insertListAfter(first_tai_functype,templist); aktproccode.insertListAfter(first_tai_functype,localslist);
templist.Free; localslist.Free;
replace_local_frame_pointer(aktproccode); replace_local_frame_pointer(aktproccode);