From af95876eba0285bd2af0fd1cbb8d14869dd730bd Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?K=C3=A1roly=20Balogh?= <karoly@freepascal.org>
Date: Fri, 6 Jun 2014 20:48:31 +0000
Subject: [PATCH] arm: an attempt to improve the a_op_const_ref patch in r27881

git-svn-id: trunk@27882 -
---
 compiler/arm/cgcpu.pas | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/compiler/arm/cgcpu.pas b/compiler/arm/cgcpu.pas
index 65dd9b4369..0b5aa7b7e0 100644
--- a/compiler/arm/cgcpu.pas
+++ b/compiler/arm/cgcpu.pas
@@ -693,9 +693,7 @@ unit cgcpu;
        begin
          tmpreg:=getintregister(list,size);
          tmpresreg:=getintregister(list,size);
-         tmpref:=ref;
-         fixref(list,tmpref);
-         a_load_ref_reg(list,size,size,tmpref,tmpreg);
+         tmpref:=a_internal_load_ref_reg(list,size,size,ref,tmpreg);
          a_op_const_reg_reg(list,op,size,a,tmpreg,tmpresreg);
          a_load_reg_ref(list,size,size,tmpresreg,tmpref);
        end;