paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-06-20 23:18:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* use NR_LOCAL_STACK_POINTER_REG in ttgwasm.localVarToRef

Browse Source 
git-svn-id: branches/wasm@47777 -
This commit is contained in:
nickysn 2020-12-14 23:07:17 +00:00
parent ce8439fb36
commit fd690e8ba1
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/wasm32/tgcpu.pas
View File

@ -397,7 +397,7 @@ unit tgcpu;
procedure ttgwasm.localVarToRef(idx: integer; size: integer; out ref: treference); procedure ttgwasm.localVarToRef(idx: integer; size: integer; out ref: treference);
begin begin
reference_reset_base(ref, current_procinfo.framepointer,idx,ctempposinvalid,size,[]); reference_reset_base(ref,NR_LOCAL_STACK_POINTER_REG,idx,ctempposinvalid,size,[]);
ref.islocal := true; ref.islocal := true;
updateFirstTemp; updateFirstTemp;
end; end;