Ver Fonte

--- Merging r42860 into '.':
U compiler/arm/narmmat.pas
--- Recording mergeinfo for merge of r42860 into '.':
U .
------------------------------------------------------------------------
r42860 | pierre | 2019-08-28 07:38:35 +0000 (Wed, 28 Aug 2019) | 1 line

Fix code generated in tarmnotnode.second_boolean
------------------------------------------------------------------------

git-svn-id: branches/fixes_3_2@42879 -

pierre há 5 anos atrás
pai
commit
43436808e9
1 ficheiros alterados com 1 adições e 1 exclusões
  1. 1 1
      compiler/arm/narmmat.pas

+ 1 - 1
compiler/arm/narmmat.pas

@@ -334,7 +334,7 @@ implementation
                     begin
                       tmpreg:=cg.GetIntRegister(current_asmdata.CurrAsmList,OS_INT);
                       { OR low and high parts together }
-                      current_asmdata.CurrAsmList.concat(setoppostfix(taicpu.op_reg_reg_reg(A_ORR,left.location.register64.reglo,left.location.register64.reghi,tmpreg),PF_S));
+                      current_asmdata.CurrAsmList.concat(setoppostfix(taicpu.op_reg_reg_reg(A_ORR,tmpreg,left.location.register64.reglo,left.location.register64.reghi),PF_S));
                     end
                   else
                     current_asmdata.CurrAsmList.concat(taicpu.op_reg_const(A_CMP,left.location.register,0));