Browse Source

Merged revisions 2084 via svnmerge from
svn+ssh://[email protected]/FPC/svn/fpc/trunk

r2084 (jonas)
* fixed offsets used by stmw/lmw

git-svn-id: branches/fixes_2_0@2085 -

Jonas Maebe 20 năm trước cách đây
mục cha
commit
638ea195b4
1 tập tin đã thay đổi với 2 bổ sung2 xóa
  1. 2 2
      compiler/powerpc/cgcpu.pas

+ 2 - 2
compiler/powerpc/cgcpu.pas

@@ -1211,7 +1211,7 @@ const
                          { with RS_R30 it's also already smaller, but too big a speed trade-off to make }
                          (regcounter2 <= RS_R29)) then
                        begin
-                         dec(href.offset,(RS_R31-regcounter2+1)*sizeof(aint));
+                         dec(href.offset,(RS_R31-regcounter2)*sizeof(aint));
                          list.concat(taicpu.op_reg_ref(A_STMW,newreg(R_INTREGISTER,regcounter2,R_SUBNONE),href));
                          break;
                        end
@@ -1364,7 +1364,7 @@ const
                          { with RS_R30 it's also already smaller, but too big a speed trade-off to make }
                          (regcounter2 <= RS_R29)) then
                        begin
-                         dec(href.offset,(RS_R31-regcounter2+1)*sizeof(aint));
+                         dec(href.offset,(RS_R31-regcounter2)*sizeof(aint));
                          list.concat(taicpu.op_reg_ref(A_LMW,newreg(R_INTREGISTER,regcounter2,R_SUBNONE),href));
                          break;
                        end