Pārlūkot izejas kodu

* Removed unused local vars.

git-svn-id: trunk@12840 -
yury 16 gadi atpakaļ
vecāks
revīzija
b3b538e215
2 mainītis faili ar 2 papildinājumiem un 3 dzēšanām
  1. 0 1
      compiler/cutils.pas
  2. 2 2
      compiler/psub.pas

+ 0 - 1
compiler/cutils.pas

@@ -208,7 +208,6 @@ implementation
 
     function newalignment(oldalignment: longint; offset: int64): longint;
       var
-        i,
         localoffset: longint;
       begin
         localoffset:=longint(offset);

+ 2 - 2
compiler/psub.pas

@@ -696,7 +696,7 @@ implementation
         headertai : tai;
         i : integer;
         varsym : tabstractnormalvarsym;
-        RedoDFA : boolean;
+        {RedoDFA : boolean;}
       begin
         { the initialization procedure can be empty, then we
           don't need to generate anything. When it was an empty
@@ -807,7 +807,7 @@ implementation
             for loops with more than one entry }
           and not(pi_has_goto in current_procinfo.flags) then
           begin
-            RedoDFA:=OptimizeInductionVariables(code);
+            {RedoDFA:=}OptimizeInductionVariables(code);
           end;
 
         if cs_opt_nodecse in current_settings.optimizerswitches then