Răsfoiți Sursa

* pass the size of the set rather than of the constant to
a_bit_test_const_loc_reg() (bug in hlcgobj conversion)

git-svn-id: trunk@27606 -

Jonas Maebe 11 ani în urmă
părinte
comite
212f4d1152
1 a modificat fișierele cu 1 adăugiri și 1 ștergeri
  1. 1 1
      compiler/ncgset.pas

+ 1 - 1
compiler/ncgset.pas

@@ -459,7 +459,7 @@ implementation
                        {should be caught earlier }
                        internalerror(2007020402);
 
-                     hlcg.a_bit_test_const_loc_reg(current_asmdata.CurrAsmList,left.resultdef,resultdef,left.location.value-setbase,
+                     hlcg.a_bit_test_const_loc_reg(current_asmdata.CurrAsmList,right.resultdef,resultdef,left.location.value-setbase,
                        right.location,location.register);
                    end
                  else