From 3c6d4f1ee206e9601f5881065ece5c8390fe5b94 Mon Sep 17 00:00:00 2001
From: yury <jura@cp-lab.com>
Date: Mon, 21 Mar 2016 09:21:24 +0000
Subject: [PATCH] * Removed unused vars.

git-svn-id: trunk@33308 -
---
 compiler/arm/narminl.pas | 1 -
 compiler/entfile.pas     | 1 -
 compiler/x86/cgx86.pas   | 3 +--
 3 files changed, 1 insertion(+), 4 deletions(-)

diff --git a/compiler/arm/narminl.pas b/compiler/arm/narminl.pas
index 4c31a5aa76..c2bc4f3ebc 100644
--- a/compiler/arm/narminl.pas
+++ b/compiler/arm/narminl.pas
@@ -448,7 +448,6 @@ implementation
         i : integer;
         negop3,
         negproduct : boolean;
-        hp : tnode;
         oppostfix : TOpPostfix;
       begin
          if current_settings.fputype in [fpu_vfpv4] then
diff --git a/compiler/entfile.pas b/compiler/entfile.pas
index 82b5a9a0a9..3b9f5c0f3e 100644
--- a/compiler/entfile.pas
+++ b/compiler/entfile.pas
@@ -409,7 +409,6 @@ end;
 
 function tentryfile.openfile:boolean;
 var
-  i      : integer;
   strm : TCStream;
 begin
   openfile:=false;
diff --git a/compiler/x86/cgx86.pas b/compiler/x86/cgx86.pas
index a312c24fe7..ddfb1ae692 100644
--- a/compiler/x86/cgx86.pas
+++ b/compiler/x86/cgx86.pas
@@ -1041,7 +1041,6 @@ unit cgx86;
     procedure tcgx86.a_loadaddr_ref_reg(list : TAsmList;const ref : treference;r : tregister);
       var
         dirref,tmpref : treference;
-        hreg : tregister;
       begin
         dirref:=ref;
 
@@ -2342,7 +2341,7 @@ unit cgx86;
 
     type  copymode=(copy_move,copy_mmx,copy_string,copy_mm,copy_avx);
 
-    var srcref,dstref,tmpref:Treference;
+    var srcref,dstref:Treference;
         r,r0,r1,r2,r3:Tregister;
         helpsize:tcgint;
         copysize:byte;