浏览代码

- reverted r21246, it breaks tcalext3/5 on x86

git-svn-id: trunk@21258 -
Jonas Maebe 13 年之前
父节点
当前提交
003a30db6b
共有 1 个文件被更改,包括 3 次插入1 次删除
  1. 3 1
      compiler/cgobj.pas

+ 3 - 1
compiler/cgobj.pas

@@ -1300,7 +1300,9 @@ implementation
              bitmask := high(aword);
            a_op_const_reg(list,OP_AND,sreg.subsetregsize,tcgint(bitmask),tmpreg);
          end;
-       a_load_reg_reg(list,sreg.subsetregsize,tosize,tmpreg,destreg);
+       tmpreg := makeregsize(list,tmpreg,subsetsize);
+       a_load_reg_reg(list,tcgsize2unsigned[subsetsize],subsetsize,tmpreg,tmpreg);
+       a_load_reg_reg(list,subsetsize,tosize,tmpreg,destreg);
      end;