From f76ba057581fc29efbe0f2e8eefe4eeacba3fde1 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Tue, 23 Oct 2012 20:13:28 +0000
Subject: [PATCH] * avoid useless GetNextReg calls in second_cmp for avr

git-svn-id: trunk@22834 -
---
 compiler/avr/navradd.pas | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/compiler/avr/navradd.pas b/compiler/avr/navradd.pas
index aefa78955b..52b568af50 100644
--- a/compiler/avr/navradd.pas
+++ b/compiler/avr/navradd.pas
@@ -193,12 +193,15 @@ interface
 
         for i:=2 to tcgsize2size[left.location.size] do
           begin
-            tmpreg1:=GetNextReg(tmpreg1);
-            tmpreg2:=GetNextReg(tmpreg2);
             if i=5 then
               begin
                 tmpreg1:=left.location.registerhi;
                 tmpreg2:=right.location.registerhi;
+              end
+            else
+              begin
+                tmpreg1:=GetNextReg(tmpreg1);
+                tmpreg2:=GetNextReg(tmpreg2);
               end;
             current_asmdata.CurrAsmList.concat(taicpu.op_reg_reg(A_CPC,tmpreg1,tmpreg2));
           end;