소스 검색

- 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;