Selaa lähdekoodia

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 vuotta sitten
vanhempi
commit
638ea195b4
1 muutettua tiedostoa jossa 2 lisäystä ja 2 poistoa
  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