Преглед изворни кода

* corrected type passed to a_bit_test_reg_loc_reg() (we force left into
a register of size opdef before)

git-svn-id: trunk@31056 -

Jonas Maebe пре 10 година
родитељ
комит
b9d4d9b141
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      compiler/ncgset.pas

+ 1 - 1
compiler/ncgset.pas

@@ -485,7 +485,7 @@ implementation
                          hlcg.a_label(current_asmdata.CurrAsmList, l);
                        end;
 
-                     hlcg.a_bit_test_reg_loc_reg(current_asmdata.CurrAsmList,left.resultdef,right.resultdef,uopdef,
+                     hlcg.a_bit_test_reg_loc_reg(current_asmdata.CurrAsmList,opdef,right.resultdef,uopdef,
                        pleftreg,right.location,location.register);
 
                      if needslabel then