瀏覽代碼

* Removed unused vars.

git-svn-id: trunk@33308 -
yury 9 年之前
父節點
當前提交
3c6d4f1ee2
共有 3 個文件被更改,包括 1 次插入4 次删除
  1. 0 1
      compiler/arm/narminl.pas
  2. 0 1
      compiler/entfile.pas
  3. 1 2
      compiler/x86/cgx86.pas

+ 0 - 1
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

+ 0 - 1
compiler/entfile.pas

@@ -409,7 +409,6 @@ end;
 
 function tentryfile.openfile:boolean;
 var
-  i      : integer;
   strm : TCStream;
 begin
   openfile:=false;

+ 1 - 2
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;