Преглед на файлове

* remove redundant variable reported by Lagprogramming on forum.

(cherry picked from commit 2628a6ee17de65f18e6b4148a601cd35ec331717)
marcoonthegit преди 2 години
родител
ревизия
49c96f4629
променени са 1 файла, в които са добавени 0 реда и са изтрити 4 реда
  1. 0 4
      packages/fcl-process/src/unix/process.inc

+ 0 - 4
packages/fcl-process/src/unix/process.inc

@@ -454,10 +454,6 @@ begin
 end;
 
 Function TProcess.WaitOnExit : Boolean;
-
-Var
-  R : Dword;
-
 begin
   if FRunning then
     fexitcode:=waitprocess(handle);