Răsfoiți Sursa

* use NR_LOCAL_STACK_POINTER_REG in ttgwasm.localVarToRef

git-svn-id: branches/wasm@47777 -
nickysn 4 ani în urmă
părinte
comite
fd690e8ba1
1 a modificat fișierele cu 1 adăugiri și 1 ștergeri
  1. 1 1
      compiler/wasm32/tgcpu.pas

+ 1 - 1
compiler/wasm32/tgcpu.pas

@@ -397,7 +397,7 @@ unit tgcpu;
 
     procedure ttgwasm.localVarToRef(idx: integer; size: integer; out ref: treference);
       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;
         updateFirstTemp;
       end;