Selaa lähdekoodia

* Removed unused local vars.

git-svn-id: trunk@40185 -
yury 6 vuotta sitten
vanhempi
commit
30d64cec68
2 muutettua tiedostoa jossa 1 lisäystä ja 3 poistoa
  1. 1 2
      compiler/i386/aoptcpu.pas
  2. 0 1
      compiler/x86/aoptx86.pas

+ 1 - 2
compiler/i386/aoptcpu.pas

@@ -152,8 +152,7 @@ end;
 
 procedure TCPUAsmOptimizer.PrePeepHoleOpts;
 var
-  p,hp1: tai;
-  tmpRef: treference;
+  p: tai;
 begin
   p := BlockStart;
   while (p <> BlockEnd) Do

+ 0 - 1
compiler/x86/aoptx86.pas

@@ -722,7 +722,6 @@ unit aoptx86;
         opsize : topsize;
         hp1 : tai;
         tmpref : treference;
-        hp2 : taicpu;
         ShiftValue : Cardinal;
         BaseValue : TCGInt;
       begin