浏览代码

* fixed a_load_subsetreg_reg according to Jonas' remarks

git-svn-id: trunk@4343 -
tom_at_work 19 年之前
父节点
当前提交
d112bfbd43
共有 1 个文件被更改,包括 1 次插入0 次删除
  1. 1 0
      compiler/powerpc64/cgcpu.pas

+ 1 - 0
compiler/powerpc64/cgcpu.pas

@@ -890,6 +890,7 @@ begin
   if (sreg.startbit <> 0) then begin
   if (sreg.startbit <> 0) then begin
     list.concat(taicpu.op_reg_reg_const_const(A_EXTRDI, destreg, sreg.subsetreg, sreg.bitlen, extrdi_startbit));
     list.concat(taicpu.op_reg_reg_const_const(A_EXTRDI, destreg, sreg.subsetreg, sreg.bitlen, extrdi_startbit));
     a_load_reg_reg(list, tcgsize2unsigned[sreg.subsetregsize], subsetsize, destreg, destreg);
     a_load_reg_reg(list, tcgsize2unsigned[sreg.subsetregsize], subsetsize, destreg, destreg);
+    a_load_reg_reg(list, subsetsize, tosize, destreg, destreg);
   end else begin
   end else begin
     a_load_reg_reg(list, tcgsize2unsigned[sreg.subsetregsize], subsetsize, sreg.subsetreg, destreg);
     a_load_reg_reg(list, tcgsize2unsigned[sreg.subsetregsize], subsetsize, sreg.subsetreg, destreg);
   end;
   end;