2
0
Эх сурвалжийг харах

* Removed unused vars for x86-64 compiler.

git-svn-id: trunk@31744 -
yury 10 жил өмнө
parent
commit
47b316d0e2

+ 2 - 0
compiler/ncgld.pas

@@ -589,7 +589,9 @@ implementation
          alignmentrequirement,
          len : aint;
          r : tregister;
+         {$if not defined(cpu64bitalu) and not defined(x86)}
          r64 : tregister64;
+         {$endif}
          oldflowcontrol : tflowcontrol;
       begin
         { previously, managed types were handled in firstpass

+ 2 - 0
compiler/x86/nx86mat.pas

@@ -230,7 +230,9 @@ interface
     procedure tx86notnode.second_boolean;
       var
          opsize : tcgsize;
+         {$if defined(cpu32bitalu)}
          hreg: tregister;
+         {$endif}
       begin
         opsize:=def_cgsize(resultdef);
 

+ 0 - 1
compiler/x86_64/aoptcpu.pas

@@ -153,7 +153,6 @@ function MatchReference(const ref : treference;base,index : TRegister) : Boolean
 
 function TCpuAsmOptimizer.PeepHoleOptPass1Cpu(var p: tai): boolean;
 var
-  next1: tai;
   hp1, hp2: tai;
   GetNextIntruction_p : boolean;
   TmpUsedRegs : TAllUsedRegs;