Просмотр исходного кода

* remove redundant variable reported by Lagprogramming on forum.

(cherry picked from commit 2628a6ee17de65f18e6b4148a601cd35ec331717)
marcoonthegit 2 лет назад
Родитель
Сommit
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);