Explorar o código

Little cleanup in tarmaddnode.second_add64bit

git-svn-id: trunk@26347 -
masta %!s(int64=11) %!d(string=hai) anos
pai
achega
d32abdf047
Modificáronse 1 ficheiros con 1 adicións e 5 borrados
  1. 1 5
      compiler/arm/narmadd.pas

+ 1 - 5
compiler/arm/narmadd.pas

@@ -483,11 +483,7 @@ interface
           begin
             asmList := current_asmdata.CurrAsmList;
             pass_left_right;
-
-            if not(left.location.loc in [LOC_REGISTER,LOC_CREGISTER]) then
-              hlcg.location_force_reg(asmList,left.location,left.resultdef,left.resultdef,true);
-            if not(right.location.loc in [LOC_REGISTER,LOC_CREGISTER]) then
-              hlcg.location_force_reg(asmList,right.location,right.resultdef,right.resultdef,true);
+            force_reg_left_right(true, false);
             set_result_location_reg;
 
             { shortcuts to register64s }